loop do
  l = gets.to_i
  break if l.zero?
  sum=0
  1.upto(12) do |i|
    m,n = gets.split.map(&:to_i)
    sum+=m-n
    if sum>=l
      puts i
      (12-i).times{gets}
      break
    end
    puts :NA if i==12
  end
end