Лучшие помощники
- Megamozg 2180 б
- Matalya1 1800 б
- DevAdmin 1685 б
- arkasha_bortnikov 805 б
- Dwayne_Johnson 800 б
14 января 2023 21:41
536
Заполните массив степенями числа 2 ( от 2 в 1 степени до 2 в энной степени)
Паскаль ABCnet
1
ответ
Var a:array [1..30] of integer;
i,x,n:integer;
begin
x:=1;
write('Введите степень 2 (n<=30): ');
readln (n);
for i:= 1 to n do
begin
a[i]:= x*2;
write(a[i],' ');
x:=x*2
end
end.
i,x,n:integer;
begin
x:=1;
write('Введите степень 2 (n<=30): ');
readln (n);
for i:= 1 to n do
begin
a[i]:= x*2;
write(a[i],' ');
x:=x*2
end
end.
0
·
Хороший ответ
16 января 2023 21:41
Остались вопросы?
Еще вопросы по категории Информатика
Напишите алгоритм, под управлением которого Робот обойдёт прямоугольную область, обнесённую стеной, по периметру и закрасит угловые клетки. Размеры об...
Чем отличается непрерывный сигнал от дискретного? 2. Что такое частота дискретизации и на что она влияет? 3. Какие звуковые форматы вы знаете? 4. Ка...
2. Какие типы ПК вы можете назвать? Укажите основные дос- тоинства и недостатки ПК разных типов ...
Зарплата менеджера становить 200$ + відсоток від продажу: продаж до 500$ – 3%, 500 –1000$ – 5%, понад 1000$ – 8%. Користувач вводить з клавіатури ріве...
Укажите виды информации по форме представления. ...
Все предметы