module Main where

main :: IO ()
main = do
  { [n] <- getInts
  ; ns  <- getInts
  ; print (sum ns)
  }

getInts :: IO [Int]
getInts = map read . words <$> getLine