uses crt;
var  n ,i,code,j : longint;
st : string;
kt :boolean;
begin clrscr;
write('Nhap so n :'); readln(n);
str(n,st);
for i:=1 to length(st) do
for j:=length(st) downto 1 do
if st[i]=st[j] then kt:=true else kt:=false;
if kt=false then write(0) else write(1);
readln
end.

#include <iostream>
using namespace std;
int main()
{
    int n,re=0,r,temp;
    cout<<"Nhap n: ";
    cin>>n;
    temp = n;
    while(temp != 0)
    {
        r=temp%10;
        re=re*10+r;
        temp/=10;
    }
    if(re == n){
        cout<<"1";
    }
    else{
        cout<<"0";
    }
    //samon247
    return 0;
}