main :: IO ()
main = getLine >> getNums >>= print . sum
  where
    getNums = map read . words <$> getLine :: IO [Integer]