Papanazbo
4 год назад
Написать программу, которая найдет сумму чисел, кратных 5 на интервале от 8 до 80
ОТВЕТЫ
Margarita
Nov 29, 2020
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.
391
Смежные вопросы: