Найти сумму чисел, делящихся на 5 в промежутке от 60 до 80 в паскале

Предыдущий
вопрос Следующий
вопрос

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.