-- Try yukicoder -- author: Leonardone @ NEETSDKASU import System.IO main = do let maxlen = 100000 putStrLn "0 0" hFlush stdout len0 <- read <$> getLine putStrLn $ "0 " ++ show maxlen hFlush stdout len1 <- read <$> getLine let y = (len0 + len1 - maxlen) `div` 2 let x = len0 - y putStrLn $ show x ++ " " ++ show y