Напишите программу которая вводит с клавиатуры натуральное число ...

Motes

Каждое число в последовательности увеличивается на 2 в степени i - 1
где i это порядковый номер числа в последовательности

program raf105;

var

 x,n,i: integer;

begin

 readln(n);

 for i:=1 to n do

 begin

   x:= x + round(power(2,i-1));

   write(x,' ');

 end;

end.

PascalABC