Monty Hall problem: Difference between revisions
Content added Content deleted
Not a robot (talk | contribs) (Add SETL) |
No edit summary |
||
Line 3,065: | Line 3,065: | ||
(0.33241,0.66759) |
(0.33241,0.66759) |
||
</pre> |
</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}}== |
=={{header|Kotlin}}== |