Seven-sided dice from five-sided dice: Difference between revisions

Added Quackery.
(Added Quackery.)
Line 1,533:
>>> distcheck(dice7, 1000000, 1)
{1: 142853, 2: 142576, 3: 143067, 4: 142149, 5: 143189, 6: 143285, 7: 142881}
</pre>
=={{header|Quackery}}==
 
<lang Quackery> [ 5 random ] is d5 ( --> n )
 
[ d5 5 * d5 +
[ table
-1 -1 -1 -1 0
0 0 1 1 1
2 2 2 3 3
3 4 4 4 5
5 5 6 6 6 ]
dup 0 < iff
drop again ] is d7 ( --> n )
 
randomise
50 times [ d5 echo ] cr
50 times [ d7 echo ] cr</lang>
 
{{out}}
 
<pre>13004322213140331014322411020430430042322202043304
31406500430614403323463623035205366324315216515642
</pre>
 
1,462

edits