Monty Hall problem: Difference between revisions
Content added Content deleted
(Added Quackery.) |
|||
Line 1,278: | Line 1,278: | ||
<lang dyalect>var switchWins = 0 |
<lang dyalect>var switchWins = 0 |
||
var stayWins = 0 |
var stayWins = 0 |
||
for plays in 0..1000000 { |
for plays in 0..1000000 { |
||
var doors = [0 ,0, 0] |
var doors = [0 ,0, 0] |
||
var winner = rnd(3) |
var winner = rnd(max: 3) |
||
doors[winner] = 1 |
doors[winner] = 1 |
||
var choice = rnd(3) |
var choice = rnd(max: 3) |
||
var shown = rnd(3) |
var shown = rnd(max: 3) |
||
while doors[shown] == 1 || shown == choice { |
while doors[shown] == 1 || shown == choice { |
||
shown = rnd(3) |
shown = rnd(max: 3) |
||
} |
} |
||
stayWins += doors[choice] |
stayWins += doors[choice] |
||
switchWins += doors[3 - choice - shown] |
switchWins += doors[3 - choice - shown] |
||
} |
} |
||
print("Staying wins \(stayWins) times.") |
print("Staying wins \(stayWins) times.") |
||
print("Switching wins \(switchWins) times.")</lang> |
print("Switching wins \(switchWins) times.")</lang> |
||
Line 1,299: | Line 1,299: | ||
{{out}} |
{{out}} |
||
<pre>Staying wins |
<pre>Staying wins 286889 times. |
||
Switching wins |
Switching wins 713112 times.</pre> |
||
=={{header|Eiffel}}== |
=={{header|Eiffel}}== |