import Control.Applicative ((<$>))

main :: IO ()
main = solve <$> readLn >>= putStrLn

solve :: Int -> String
solve n = let a = n `div` 2 in show a ++ " " ++ show (n - a)