a=(-50:50)^2 o=outer;s=o(o(a,a,"+"),a,"+") for(d in 0:50){write(length(s[s<=d^2]),1)}
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page