Factoradic Counter by aglias

n,i;main(k,t){for(;i=n<1001;puts("")){for(t=n++;t/k;)k*=++i;for(;i;t%=k)k/=i--,putchar(48+t/k);}}

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

download

return to the top page