import Control.Monad main = do n <- readInt lines <- replicateM n readInt putStrLn $ show $ sum lines where readInt = fmap (\s-> read s ::Int) getLine