Ответы
Ответ дал:
1
Ответ:
Написано на языке 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.
Объяснение:
Похожие вопросы
1 год назад
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад