import Ġjava . util . Random Ċ Ċ private Ġfun Ġin Circle ( x : ĠDouble , Ġy : ĠDouble , Ġradius : ĠDouble Ġ= Ġ 1 . 0 ) Ġ= Ġ( x Ġ* Ġx Ġ+ Ġy Ġ* Ġy ) Ġ< Ġradius Ġ* Ġradius Ċ Ċ fun Ġmont e Car lo ( samples : ĠInt ): ĠDouble Ġ{ ĊĠĠĠ Ġvar Ġpi Count Ġ= Ġ 0 ĊĠĠĠ Ġval Ġrandom Ġ= ĠRandom () ĊĊĠĠĠ Ġfor Ġ( i Ġin Ġ 0 Ġuntil Ġsamples ) Ġ{ ĊĠĠĠĠĠĠĠ Ġval Ġx Ġ= Ġrandom . next Double () ĊĠĠĠĠĠĠĠ Ġval Ġy Ġ= Ġrandom . next Double () ĊĠĠĠĠĠĠĠ Ġif Ġ( in Circle ( x , Ġy )) ĊĠĠĠĠĠĠĠĠĠĠĠ Ġpi Count ++ ĊĠĠĠ Ġ} ĊĠĠĠ Ġreturn Ġ 4 . 0 Ġ* Ġpi Count Ġ/ Ġsamples Ċ } Ċ Ċ fun Ġmain ( args : ĠArray < String >) Ġ{ ĊĠĠĠ Ġval Ġpi Estimate Ġ= Ġmont e Car lo ( 1 0 0 0 0 0 ) ĊĠĠĠ Ġprintln (" Est imated Ġpi Ġvalue : Ġ$ pi Estimate ") ĊĠĠĠ Ġval Ġpercent Error Ġ= Ġ 1 0 0 Ġ* ĠMath . abs ( pi Estimate Ġ- ĠMath . PI ) Ġ/ ĠMath . PI ĊĠĠĠ Ġprintln (" Percent Ġerror : Ġ$ percent Error ") Ċ } Ċ