main = do getLine ss <- words <$> getLine ts <- words <$> getLine let (s,t) = head $ filter (uncurry (/=)) $ zip ss ts putStrLn s putStrLn t