module Main (main) where

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