Остаток

Входные данные
Вводятся 4 числа: a, b, c и d.

Выходные данные
Выведите все числа на отрезке от a до b, дающие остаток c при делении на d. Если таких чисел не существует, то ничего выводить не нужно.

Исходный код на языке Pascal
var
  a, b, c, d, i: integer;

begin
  read(a, b, c, d);
  for i := a to b do
    if (i mod d = c) then 
      writeln(i);
end.