(phixonline)--> with javascript_semantics integer N = 100 for i=1 to 6 do integer inside = 0 for n=1 to N do integer x = rand(N), y = rand(N) inside += (x*x+y*y<N*N) end for pp({N,4*inside/N}) N *= 10 end for