byte::a(199)=1;j=1;1 print'(i0)',j;a(j)=0;i=j;do2 j=1,141;do2 k=2-1/i,i;goto(1)i/k*k/i*j/k*k/j*a(j);2 z=z;end
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page