Даны трёхзначные числа, если число заканчивается на 4 вывести его на экран

Выводит все 3значные числа которые отвечают условию var     i: integer; begin     for i := 100 to 999 do         if i mod 10 = 4 then             write(i, ' '); end.