Найти сумму чисел, делящихся на 5 в промежутке от 60 до 80 в паскале
Найти сумму чисел, делящихся на 5 в промежутке от 60 до 80 в паскале
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
program SumOfNumbersDivisibleBy5;
var
i, sum: integer;
begin
sum := 0;
for i := 60 to 80 do
begin
if i mod 5 = 0 then
begin
sum := sum + i;
end;
end;
writeln('Сумма чисел, делящихся на 5 в промежутке от 60 до 80: ', sum);
end.