for(i=0;v=++i,i<3e3;it[v]=it[i]||~print(i))for each(k in''+i)v+=+k