n,*a=$<.read.split.map &:to_i
s=->d,e{d.sort{|x,y|z=e.lcm(x)<=>e.lcm(y);z==0?x<=>y:z}}
(1..n).map{|i|a[i,n]=s[a[i,n],a[i-1]]}
$><<a*' '