Написать программу, которая найдет сумму чисел, кратных - вопрос №151703945 от ааа512 26.09.2021 17:50

Question

Информатика: Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80

ааа512 · Answer

var i, s: integer;begin s := 0; for i := 8 to 80 do if i mod 5 = 0 then s := s + i; write(s)end....