while (n=gets.to_i)!=0
  h=Hash.new
  n.times do
    id,val,amo=gets.split.map(&:to_i)
    h.key?(id) ? h[id]+=(val*amo) : h.store(id,val*amo)
  end
  ans=h.select{|k,v| v>=1000000}
  puts ans.empty? ? "NA" : ans.keys
end