Ответы
Ответ дал:
0
var i, sum: integer;
begin
sum := 0;
for i := 1 to 50 do
{answer too big => -24908}
begin
sum := sum + i * i * 4
end;
writeln('Sum = ', sum);
readln(i) {programm don't stop and so can read answer}
end.
begin
sum := 0;
for i := 1 to 50 do
{answer too big => -24908}
begin
sum := sum + i * i * 4
end;
writeln('Sum = ', sum);
readln(i) {programm don't stop and so can read answer}
end.
Ответ дал:
0
var i, sum: integer;
begin
sum := 0;
for i := 1 to 50 do {answer too big => -24908}
sum := sum + i * i * 4
writeln('Sum = ', sum);
readln(i) {programm don't stop and so can read answer}
end.
begin
sum := 0;
for i := 1 to 50 do {answer too big => -24908}
sum := sum + i * i * 4
writeln('Sum = ', sum);
readln(i) {programm don't stop and so can read answer}
end.
Вас заинтересует
1 год назад
6 лет назад
6 лет назад
9 лет назад
9 лет назад