import Control.Applicative ((<$>))

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

solve :: String -> String
solve n = a ++ " " ++ b
  where a = map (\c -> if c == '7' then '6' else c) n
        b = show $ read n - read a