<>;map{$\+=$-=($,=++$d[$i=$_])-$\;$,<$d[$i]or$d[$i]=$,while($i+=$_)<=1e6}sort{$a-$b}glob<>;print