for(i,1,500,k:=j:=1;while(j<=k,k=k+j*0**(i%j);j=j+1)if(i<k,i println))
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page