n,*a=$<.read.split.map &:to_i s=->d{d.sort_by{|e|d[0].lcm e}} n.times{|i|a[i,n]=s[a[i,n]]} $><