Monty Hall problem: Difference between revisions
Content added Content deleted
(Added BASIC) |
m (→{{header|BASIC}}: Added trans) |
||
| Line 167: | Line 167: | ||
=={{header|BASIC}}== |
=={{header|BASIC}}== |
||
{{works with|QuickBasic|4.5}} |
{{works with|QuickBasic|4.5}} |
||
{{trans|Java}} |
|||
<qbasic>RANDOMIZE TIMER |
<qbasic>RANDOMIZE TIMER |
||
DIM doors(3) '0 is a goat, 1 is a car |
DIM doors(3) '0 is a goat, 1 is a car |
||
| Line 192: | Line 193: | ||
<pre>Switching wins 21805 times. |
<pre>Switching wins 21805 times. |
||
Staying wins 10963 times.</pre> |
Staying wins 10963 times.</pre> |
||
=={{header|Fortran}}== |
=={{header|Fortran}}== |
||
{{works with|Fortran|90 and later}} |
{{works with|Fortran|90 and later}} |
||