use std::io::Read;
use std::str::SplitWhitespace;
use std::str::FromStr;

pub fn read_stdin() -> String {
    let mut s = String::new();
    ::std::io::stdin().read_to_string(&mut s).unwrap();
    s
}

pub trait Parse<T> {
    fn parse(&mut self) -> T;
}

impl<'a, T> Parse<T> for SplitWhitespace<'a>
where
    T: FromStr,
{
    fn parse(&mut self) -> T {
        let word = self.next().unwrap();
        word.parse().ok().unwrap()
    }
}

fn main() {
    let source = read_stdin();
    let mut iter = source.split_whitespace();
    let n: usize = iter.parse();
    let hs: Vec<i64> = (0..n).map(|_| iter.parse()).collect();

    let mut c = 1;
    for (i, &h) in hs[1..].iter().enumerate() {
        if (0..i).all(|j| hs[j] < h) {
            c += 1;
        }
    }

    println!("{}", c);
}