use proconio::input;
fn main() {
    input! {
        n: usize,
        a: [usize; n],
    }
    let l = a.iter().sum::<usize>() / n;
    let mut cnt = 0;
    for x in a {
        if x >= l + 100 {
            cnt += 1;
        }
    }
    println!("{cnt}");
}