Ответы
Ответ дал:
0
Program z18; Var i: integer; s: real;Begin s:= 1; for i:=1 to 7 do s:= s + power(3,i); writeln('Ответ: ',s);End.
Приложения:
Вас заинтересует
2 года назад
2 года назад
3 года назад
3 года назад
9 лет назад
10 лет назад