{for(n=$0;++i<j=n;print FS$0)for(;a[j]=--j>9?sprintf("%c",j+55):j;$j=(NR?a[NR]:FS)a[i*j%n])NR=i*j/n}