Стандартные задачи на циклы

Простейшие алгоритмы

(в разработке)

Рекуррентные соотношения

7. Вывод 10 первых степеней двойки

begin

 var x := 2;
 for var i := 1 to 10 do
 begin
   writeln(i:2,x:5);
   x *= 2;
 end;

end.