RosettaCodeData/Task/Monty-Hall-problem/Clojure/monty-hall-problem-2.clj
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

6 lines
209 B
Clojure

monty-hall-problem> (println "staying:" (simulate true 1000))
staying: wins 337 times out of 1000
nil
monty-hall-problem> (println "switching:" (simulate false 1000))
switching: wins 638 times out of 1000
nil