VAR
   n, d: INTEGER; z, zz: STRING;
BEGIN 
    READLN(n);
    REPEAT
         d := n MOD 10; STR(d, zz); z := zz + z;
         n := n DIV 10;
    UNTIL n = 0;
    WRITELN(z);
END.