написать программу которая находит сумму четных чисел от 0 до ...
Ответ
var s, i: integer;
begin
s:=0;
for i:=0 to 1000 do if i mod 2 = 0 then s:=s+i;
write(s);
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
18.12.2022