RosettaCodeData/Task/Monte-Carlo-methods/J/monte-carlo-methods-2.j
2023-07-01 13:44:08 -04:00

1 line
62 B
Text

piMCt=: (0.25&* %~ +/@(1 >: [: +/&.:*: _1 2 p. 0 ?@$~ 2&,))"0