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

ans = 0
h.each_with_index do |v,i|
  if i == 0 then
    ans += 1
    next
  end

  flag = false
  (0..i).each do |n|
    if h[n] > v then
      flag = true
    end
  end
  if flag then
    next
  else
    ans += 1
  end
end

puts ans
