dim a(7^7) do for j=1to 99a(i*i+j*j)=1next if a(i)?i^.5using"%6f" i=i+1loop
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page