Ответы
Ответ дал:
0
//PascalABC.NET
var
s,x:int64;
i:integer;
begin
Readln(x);
For i:=0 to 5 do s:=s+Round(Power(x,i*2));
Writeln(s);
end.
var
s,x:int64;
i:integer;
begin
Readln(x);
For i:=0 to 5 do s:=s+Round(Power(x,i*2));
Writeln(s);
end.
Ответ дал:
0
Спасибо! Правда... Я вчера сам сделал, но пусть для других людей будет
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
9 лет назад
9 лет назад
10 лет назад