main :: IO () main = getLine >>= putStr . reverse