Паскаль.цикл с параметром. вычислите сумму: 1+2+4+8++2^10

Program n_1;

uses Math;

var i, x: integer; n:real;

begin

   x:=10;

   n:=1;

   for i:=1 to x do n:=n + Power(2, i);

   writeln(n:0:0);

end.

Это вариант, если вы уже проходили функции (в частности - возведение в степень).