use proconio::{input, fastout};

#[fastout]
fn main() {
    input!{
        n: usize,
        v: [i32; n],
    }
    let mut col = vec![0, 0, 0, 0, 0, 0, 0, 0, 0];
    for i in 0..n {
	let rating = v[i];
	let waru = rating / 400;
	if waru < 8 {
	    col[waru as usize] = 1;
	} else {
	    col[8] = col[8] + 1;
	}
    }
    let mut ret = 0;
    for i in 0..8{
	ret += col[i];
    }
    println!("{} {}", ret, ret + col[8]);
}
