Ответы
Ответ дал:
0
Программа на паскале:
Program xxx;
Var i, n, s : integer;
begin
write ('введите N =' );
readln (n);
s:=0;
for i:=1 to n do
s:= s+ sqr(i+1);
writeln ('сумма =' , s);
readln
end.
Похожие вопросы
2 года назад
10 лет назад
10 лет назад
10 лет назад
10 лет назад