(use srfi-42)

(define (solve)
    (let* ((n (read)) (xs (list-ec (:range v n) (read))))
        (print (apply + xs))))

(solve)