uses crt;vara,i:integer;st,tmp:string;beginread(a);st:=inttostr(a);for i:=length(st) downto 1 do tmp:=tmp+st[i];write(tmp);end.