Дано трёхзначное число. выясните, является ли оно палиндромом ("перевёртышем"), т.е. таким числом, которое читается одинаково и справа налево, и слева направо.
var
n:integer;
begin
readln(n);
if (n mod 10)=(n div 100) then
writeln('палиндром')
else
writeln('не палиндром');
end.