Четные числа

Входные данные
Вводятся целые числа a и b. Гарантируется, что a не превосходит b

Выходные данные
Выведите (через пробел) все четные числа от a до b (включительно).

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

begin
  read(a, b);
  for i := a to b do
    if i mod 2 = 0 then
      write(i, ' ');
end.