def calc(a)
  return 0 unless a
  return a[0] if a.length == 1
  return a.max if a.length == 2
  min = a.min
  a.map!{|i| i - min}
  next_list = []
  s = 0
  zero_index = [0]  
  a.each_with_index do |num,i|
    zero_index << i if num == 0
  end
  zero_index << -1
  return min + (1..zero_index.length - 1).inject(0){|res,i| res += calc(a[i - 1..i])}
end
n = gets.to_i
a = gets.chomp.split(' ').map(&:to_i)
puts calc(a)
