Войти Регистрация Спроси ai-bota

Напишите програмный код для программы в делфи найти 2 в степени n. заранее

Ответ:

Tamalova5

20.07.2020 18:22

Var i, c, n: integer;
begin
read(n);
c:=1;
for i:=1 to n do
c:=c*2;
writeln(c);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

слополоп

06.03.2021 17:43

Задача 2: Написать программу, которая выводит на экран символ таблицы ASCII, который соответствует введенному числу Задача 3: Написать программу, которая считывает введен символ...

elena090107

02.03.2023 17:22

? Ойлануға берілген сұрақтар1. Қалай ойлайсың, программалауды үйрену не үшін қажет?2. Программа құрудың интеграцияланған ортасы (IDE) бойыншатүсінігіңді сыныптастарына қысқаша...

саша4246

10.02.2022 08:38

Чому не варто писати текст листа великими літерами...

Юшут

01.08.2022 22:23

Вывести все четырехзначные числа, цифры которых являются нечетными программировать в pascal abc...

ndzandigiv

01.08.2022 22:23

Определить порядковые номера отрицательных элементов одномерного массива a[1..10] 100...

Qwizzi

17.10.2022 12:13

Сканируется цветное изображение размером 10*10 см.разрешающая сканера 1200*1200dpi,глубина цвета 24 информационный объем будет иметь полученный графический файл? (если можно...

пингвин38

17.10.2022 12:13

Program tutor; var x: byte; const p = 12; a = 6; b = 10; c =11; begin x: = (p*(p-a)*(p-b)*(p-c))^(1/2); writeln(x); end. что в этой программе не так? я хочу извлечь корень из...

ZlOdEyKaTaMaRa

19.01.2021 18:01

Даны целые числа m и n. если числа не равны, то заменить первое число нулем, а второе – единицей, а если равны, удвоить значение каждого из чисел. (написать программу в паскале)...

darina224

06.06.2022 22:40

2.определите информационный объем звукового файла,если файл длится 1 минуту и звуковой картой с частотой 32 кгц и разрешением 8 бит воспроизводится стереозвук.ответ запишите...

Лапулька111

06.06.2022 22:40

Расскажите о судьбе индейского населения...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку