Программа суммирования четных значений от 600 до - вопрос №6009889718054 от nikniksergeev1 05.07.2022 23:19

Question

Информатика: Программа суммирования четных значений от 600 до 988

nikniksergeev1 · Answer

program task31101860; var  Sum: integer; begin  for var i := 600 to 989 do    if i mod 2 = 0 then      Sum := Sum + i;  Writeln(Sum); end.Вывод: 154830...