Concentric Circles by teebee

numeric digits 11
a.=0
do n=1
x=n
do i=0 to 21
k=n*n+i*i
a.k=1
x=x/2+n/2/x
end
do a.n
say format(x,,6,901-n)
end
end

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

download

return to the top page