byte a(99);m=10;do1 i=0,50;k=m;m=-m do2 j=99,1,-1;k=a(j)*i+k/10;a(j)=mod(k,10) 2 if(k>0)n=j;1 print'(99i0)',a(n:);end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page