Вывести на экран числа от -99 до 99 оканчивается на 7

Pascal

------------------------------------------------------------------

var
   x: integer;
begin
for x := -99 to 99 do
  If abs(x) mod 10 = 7 then
    writeln(x);
readln;
end.