Создайте программу в паскале, которая будет выводить на экран числовой ряд из 10 элементов, начиная с цифры 2, каждый элемент должен быть в 2 раза предыдущего.
должно работать так:
Окно вывода:
2 4 8 16 32 64 128 256 512 1024
должно работать так:
Окно вывода:
2 4 8 16 32 64 128 256 512 1024
Answers & Comments
Verified answer
Var a,i:integer;begin
a:=1;
for i:=1 to 10 do
begin
a:=a*2;
write(a,' ');
end;
end.
Результат:
2 4 8 16 32 64 128 256 512 1024