import Control.Applicative

main = do
  n <- readLn
  as <- (map read . words) <$> getLine
  putStrLn $ show $ sum $ take n as