import strutils, sequtils
proc getInt: int = stdin.readLine.parseInt

let N = getInt()

var
  a = newSeqWith(0, 0)
  rnk = 1

for i in 0 ..< N:
  a.add getInt()

  if a[0] < a[i]:
    rnk += 1

  echo rnk