use proconio::{input, marker::Chars};

fn main(){
    input!{
        n: usize,
        m: usize,
        sr: [(Chars, i32); n],
    }

    let mut ans: usize = 0;
    for (s, r) in sr{
        let mut ok = true;
        for i in 0..4{
            if s[i] == 'x'{
                ok = false;
            }
        }
        if r < 1200{
            ok = true;
        }
        if !ok{
            ans += 1;
        }
    }
    println!("{}", ans);
}