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

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

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.