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

(по условию x- трехзначное)var x:integer;beginreadln(x);if (x mod 10)=(x div 100) then writeln(x, '- палиндром')else writeln(x, '-не палиндром')end.