PROGRAM Y9009
    INTEGER(8)::N,A,I
    INTEGER(8)::RESULT=0
    
    READ(5,*)N
    
    DO I=1,N
        READ(5,*)A
        RESULT=RESULT+A
    END DO
    
    PRINT'(I0)',RESULT
END PROGRAM Y9009