Ответы
Ответ дал:
0
Написано на языке PascalABC.NET
- const
- cValue = 2;
- var
- N, i: integer;
- resultNumber: real;
- begin
- Readln(N);
- for i := 1 to N do
- resultNumber := resultNumber + Power(cValue, i);
- Writeln(resultNumber);
- end.
Вас заинтересует
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад