Вводится натуральное число n. Вычислите 1+2+2^2+2^3+... +2n.

Помогите пожалуйста с информатикой!!!

собственно чтобы найти сумму n членов нужно var s : real; for var i := 1 to n do s += Power(2, n-1); writeln('сумма = ', s);

решение с суммой поправил в ответе

данную последовательность можно записать в виде:

a(n)=a^(n-1)

вот программа расчета n-го члена последовательности

var

   n : integer;

   s : real;

begin

   write('ввести n = ');

   readln(n);

   writeln(n,'-й член последовательности равен ', Power(2, n-1));

   for var i := 1 to n do s += Power(2, i-1);

   writeln('сумма = ', s);

end.