main = do ns <- (map read . words) <$> getLine s <- getLine putStr $ show $ foldl (+) 0 ns putChar ' ' putStr s