Дано трехзначное число.составить программу которая определит одинаковы ли первая и третья цифры

Program hhh54;
var x: longint;
begin
  read (x);
  if (x mod 10) = (x div 100) then write ('ОДИНАКОВЫ')
  else write ('НЕ ОДИНАКОВЫ');
end.