Self Numbers by pooq

for(i in a<-1:3e3){s=n=i;while(n>0){s=s+n%%10;n=n%/%10};a[s]=0;if(a[i])write(i,T)}

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page