Ввести с клавиатуры двухзначное число является ли оно симитричным, Pascal abc срочно надо!!!

var a: integer;
begin
read(a, b);
if a mod 10 = a div 10 then write('Является')
else write('Не является')
end.