Дано натуральное число n. Вычислить 21+22+…+2n .

Написано на языке PascalABC.NET

1 const

2   cValue = 2;

3 var

4   N, i: integer;

5   resultNumber: real;

6 begin

7  Readln(N);

8   

9   for i := 1 to N do

10      resultNumber := resultNumber + Power(cValue, i);

11   Writeln(resultNumber);

12end.

Объяснение: