n=gets.to_i
h=gets.split.map(&:to_i)
cnt=0

while !h.all?{|i|i==0} # ぜんぶ0になったらおわり
    l=h.index{|i|i!=0} #lower_bound(!0) みたいな
    k=h[l...n].index(0)
    if k!=nil
        k+=l
    else
        k=n
    end

    mn=h[l...k].min
    h[l...k]=h[l...k].map{|i|i-mn}
    cnt+=mn
end

p cnt