Найти все симметричные натуральные трехзначные числа — Pascal(Паскаль)

Например:
454, 222, 121.

var
 i:integer;
begin
 for i:=101 to 999 do
  if i div 100=i mod 10 then write(i:4);
end.