n = gets.to_i
h = gets.split.map(&:to_i)
ans = 0
n.times do |i|
    f = true
    i.times do |j|
        if h[j] > h[i]
            f = false
            break
        end
    end
    if f
        ans += 1
    end
end
p ans