import Control.Applicative

swap [x,y] | x > y = [y,x]
swap [x,y]         = [x,y]

main = do
    ss <- words <$>getLine
    let x:y:_ = swap $ take 2 [ read s | s <- ss]
    
    if x*y>0 then do
      putStrLn $ show x ++ " " ++ show y
      main
    else return()