main :: IO () main = getLine >>= putStr >> putStrLn "0"