// No.2714 Amaou
package main

import (
	"fmt"
	"slices"
)

func main() {
	var n int
	fmt.Scan(&n)

	m := make([][]string, n)
	for i := 0; i < n; i++ {
		var x = make([]string, 4)
		fmt.Scan(&x[0], &x[1], &x[2], &x[3])
		m[i] = x
	}
	amaou := 0
	for j := 0; j < n; j++ {
		y := m[j]
		if slices.Contains(y, "akai") &&
			slices.Contains(y, "marui") &&
			slices.Contains(y, "okii") &&
			slices.Contains(y, "umai") {
			amaou++
		}
	}
	fmt.Println(amaou)
}