Monte Carlo methods: Difference between revisions

m
→‎{{header|RPL}}: highlighted syntax
m (→‎{{header|RPL}}: highlighted syntax)
Line 2,832:
 
=={{header|RPL}}==
≪ 0 1 3 PICK '''START'''
RAND SQ RAND SQ '''IF''' + 1 <3 '''THEN''' 1 +PICK '''END NEXTSTART'''
SWAP / 4 *RAND SQ RAND SQ +
'''IF'MCARL'' 1 < '''THEN''' STO1 + '''END'''
'''NEXT'''
SWAP / 4 *
≫ '<span style="color:blue">MCARL</span>' STO
 
100 '''<span style="color:blue">MCARL'''</span>
10000 '''<span style="color:blue">MCARL'''</span>
10000 '''<span style="color:blue">MCARL'''</span>
500000 '''<span style="color:blue">MCARL'''</span>
{{out}}
<pre>
1,151

edits