Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
14 января 2023 21:41
1003
Заполните массив степенями числа 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
Остались вопросы?
Еще вопросы по категории Информатика
Сколько символов содержит сообщение, записанное с помощью 16- символьного алфавита, если его объем составил 1/16 часть мегабайта?...
определите значение переменной а после исполнения следующего алгоритма . Порядок действий соответствует правилам арифметики с:=27 b:=100 -c*2 a:=b-c/9...
Постройте на координатной плоскости рисунок, отметив и соединив точки в такой последовательности: 1-2-3-4-5-6-7-8-9-10-7-11-12-13-14-11-15-16-17-18-19...
Нарисуй робота как ты себе его представляешь?...
На ферме 600 коров. На поле 10000 слепней. От численно превосходящего врага коровы спасаются бегством в лес. Ищут их по радиомаякам, передающим код ко...
Все предметы 
