import sequtils,algorithm
proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc scan(): int =
  while true:
    let k = getchar_unlocked()
    if k < '0' or k > '9': break
    result = 10 * result + k.ord - '0'.ord

proc parseLine(): tuple[x,y:int] =
  let (x1,x2,x3) = (scan(),scan(),scan())
  let (y1,y2,y3) = (scan(),scan(),scan())
  result.x = x3 + x2 * 60 + x1 * 1440
  result.y = y3 + y2 * 60 + y1 * 1440

proc swapSortDescending(arr:var seq[int],index:int) =
  # 10-9-6-3-7-2-1 を直す
  for i in 0..<arr.len:
    if arr[i] >= arr[index] : continue
    for j in i..<index: swap(arr[j],arr[index])
    break
let n = scan()
let m = scan()
let U = newSeqWith(m,parseLine()).sortedByIt(it.y)
var preY = newSeq[int](n) # preYの遅い順に見るべき
var ans = 0
for u in U:
  if preY[^1] >= u.x : continue
  for i in 0..<n:
    if preY[i] >= u.x: continue
    preY[i] = u.y
    ans += 1
    preY.swapSortDescending(i)
    break
echo ans