Monty Hall problem: Difference between revisions
no edit summary
Not a robot (talk | contribs) (Add SETL) |
No edit summary |
||
Line 3,065:
(0.33241,0.66759)
</pre>
=={{header|K}}==
<syntaxhighlight lang="k">
montyhall:{t:,/ 1_ x {`prng@`t[];ch:1?3;pr:1?3;sw:1?2;$[sw;a:ch=pr;a:~(ch=pr)];a}\0N;("KEEP %";(+/t)%x;"SWAP %";(+/~t)%x)}
</syntaxhighlight>
=={{header|Kotlin}}==
| |||