program main
    implicit none
    integer :: N, i
    integer(16), allocatable :: A(:)

    read *, N
    allocate(A(N))
    do i = 1, N
        read *, A(i)
    end do

    print *, sum(A)
end program main