Ответы
Ответ дал:
0
var i,sum:integer;
begin
sum:=0;
for i:=1 to 100 do sum:=sum+i;
writeln(sum);
end.
begin
sum:=0;
for i:=1 to 100 do sum:=sum+i;
writeln(sum);
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад