var n:longint;
function check(n:longint) : boolean;
var s:string
begin
str(n,s);
for i:=1 to length(s) div 2 do
if s[1+i-1]<>[length(s)-i+1] then exit(false);
exit(true);
end;
begin
write('Nhap n: '); readln;
if check(n) then write('La so doi xung') else write('Khong phai la so doi xung');
readln;
end.