gets i=0 a=$<.map{|e|a,b=e.split.map &:to_i [a-30000*b,i+=1]}.max puts a[0]<500000?:NO:[:YES]+[a[1]]*6