11 lines
216 B
Text
11 lines
216 B
Text
integer N = 100
|
|
for i=1 to 6 do
|
|
integer inside = 0
|
|
for i=1 to N do
|
|
integer x = rand(N),
|
|
y = rand(N)
|
|
inside += (x*x+y*y<N*N)
|
|
end for
|
|
?{N,4*inside/N}
|
|
N *= 10
|
|
end for
|