n = gets.to_i
nums = readline.split.map(&:to_i)
count = 0

nums.each_with_index do |m, i|
view = true
  nums.each_with_index do |n, j| 
    if i == j
      break
    end
    if m < n
      view = false
      break
    end
  end
  if view
    count += 1
  end
end

p count