uses crt;

var s:string;
kt:boolean;
i:longint;
begin

clrscr;
assign(input,'xau0089.inp');

reset(input);
assign(output,'xau0089.out');

rewrite(output);
readln(s);

kt:=true;
for i:=1 to (lenght(s) div 2) do
kt:=kt and (s[i]=s[lenght(s)-i+1]);

write(kt);
end.

`@Ly`

#include <bits/stdc++.h>
#define ll long long
using namespace std;
string s, s1;
int main()
{
    freopen("xau0089.INP", "r", stdin);
    freopen("xau0089.OUT", "w", stdout);
    ios::sync_with_stdio(0);
    cin.tie(0);
    cout.tie(0);
    cin >> s;
    s1 = s;
    reverse(s.begin(), s.end());
    if (s == s1)
    {
        cout << "xau doi xung";
    }
    else
    {
        cout << "xau khong doi xuong";
    }
}