Rosetta Code

Monty Hall problem: Difference between revisions

Page Discussion

Monty Hall problem (view source)

Revision as of 19:31, 27 October 2009

31 bytes added ,  14 years ago
→‎{{header|PHP}}: fixed logic
m (→‎{{header|Perl}}: Removed redundant "exit(0)".)
(→‎{{header|PHP}}: fixed logic)
Line 842:
$stay_win = 0;
forforeach ($i=0;range(1, $i<$iterations;) as $i++){
$doors = array(0, 0, 0);
$doors[randarray_rand(0,2$doors)] = 1;
$choice = randarray_rand(0,2$doors);
$shown;do {
while( $shown != $choice && array_rand($doors[$shown] != 1);
} while($shown == rand(0,2$choice || $doors[$shown] == 1);
$stay_win += $doors[$choice];
$switch_win += ($doors[3 - $choice] ==- 0) ? 1 : 0$shown];
}
Anonymous user
Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/77835"