var a,b,c:integer; begin read (a); b:=a mod 100; c:=a div 100; if (b mod 10=c div 10) and (c mod 10 =b div 10) then write ('палиндром') else write ('не палиндром') end.