Сумма=7650
Объяснение:
Программа:
var sum:integer;
begin
sum:=0;
for var i:=100 to 200 do begin
if i mod 2=0 then
sum:=sum+i;
end;
writeln (sum);
end.
Сумма=7650
Объяснение:
Программа:
var sum:integer;
begin
sum:=0;
for var i:=100 to 200 do begin
if i mod 2=0 then
sum:=sum+i;
end;
writeln (sum);
end.