n,k = gets.split.map(&:to_i)
s,p,u = readlines.map { |l| l.split.map(&:to_i) }.transpose

r = Array.new(n)
cnt = {}
cnt.default = 0
puts (0...n).sort_by { |i| [-s[i],p[i]] }.each { |i|
    r[i] = cnt[u[i]]
    cnt[u[i]] += 1
}.sort_by { |i|
    [-s[i], r[i], p[i]]
}.first(k)