Monte Carlo methods: Difference between revisions

Content added Content deleted
m (→‎{{header|RPL}}: highlighted syntax)
Line 2,832: Line 2,832:


=={{header|RPL}}==
=={{header|RPL}}==
≪ 0 1 3 PICK '''START'''
≪ 0
RAND SQ RAND SQ '''IF''' + 1 < '''THEN''' 1 + '''END NEXT'''
1 3 PICK '''START'''
SWAP / 4 *
RAND SQ RAND SQ +
''''MCARL'''' STO
'''IF''' 1 < '''THEN''' 1 + '''END'''
'''NEXT'''
SWAP / 4 *
≫ '<span style="color:blue">MCARL</span>' STO


100 '''MCARL'''
100 <span style="color:blue">MCARL</span>
10000 '''MCARL'''
10000 <span style="color:blue">MCARL</span>
10000 '''MCARL'''
10000 <span style="color:blue">MCARL</span>
500000 '''MCARL'''
500000 <span style="color:blue">MCARL</span>
{{out}}
{{out}}
<pre>
<pre>