function (@main)(ARGS)
	n,m = (parse(Int,x) for x in eachsplit(readline()))
	cnt = 0
	for _ in 1:n
		s,r = eachsplit(readline())
		r = parse(Int,r)
		if r >= 1200 && s[1:4] != "oooo"
		    cnt += 1
		end
	end
	println(cnt)
end