Repeat. Вывести на экран все целые числа от A до B кратные пяти - Free Pascal

Формулировка задачи:

задать интервал целых чисел от а до б вывести на экран все целые числа от а до б кратные пяти числа вывести в строку через пробел решите с помощбю рипит плиз

Решение задачи: «Repeat. Вывести на экран все целые числа от A до B кратные пяти»

Листинг программы

var a,b,i:integer;
begin
  write('a = ');readln(a);
  write('b = ');readln(b);
  For i:=a to b do if a mod 5 = 0 then write(a,' ');
end.

Объяснение кода листинга программы

В первой строке объявляются три переменные: a, b и i типа integer (целое число).
Во второй и третьей строках происходит ввод значений переменных a и b с помощью функции readln().
В четвертой строке начинается цикл for, который будет выполняться от значения переменной a до значения переменной b.
В пятой строке проверяется условие, что значение переменной a кратно пяти с помощью оператора mod (остаток от деления).
Если условие выполняется, то в шестой строке выводится значение переменной a с помощью функции write().
В седьмой строке после цикла for выводится символ новой строки, чтобы перейти на новую строку.
В восьмой строке программа заканчивается.