main :: IO () main = do ab <- map read . words <$> getLine s <- getLine putStrLn $ solve ab s solve :: [Int] -> String -> String solve ab s = (show . sum) ab ++ " " ++ s