Ответы
Ответ дал:
0
var i,s:integer;
begin
s:=0;
for i:=-20 to 30 do
s:=s+i*i;
Writeln(s);
end.
Вопросы, ошибки, недочеты в ЛС
Ответ дал:
0
var x,y:integer;
begin
for y:=-20 to 30
x:=x+sqr(y);
writeln(x);
end.
begin
for y:=-20 to 30
x:=x+sqr(y);
writeln(x);
end.
Похожие вопросы
2 года назад
2 года назад
7 лет назад
7 лет назад
10 лет назад
10 лет назад
10 лет назад