Concentric Circles by *yuko*

numeric digits 11;a.=0;do i=1;n=i<902;do j=0 to 21;k=i*i+j*j;a.k=1;n=(n+i/n)/2;end;do a.i;say format(n,,6);end;end

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

download

return to the top page