Seven-sided dice from five-sided dice: Difference between revisions
m
→{{header|FreeBASIC}}
(Seven-sided dice from five-sided dice en FreeBASIC) |
|||
Line 808:
For i As Ulongint = minBucket To maxBucket
Print i, buckets(i), Iif((minVal > buckets(i)) Or (buckets(i) > maxVal),"fail","")
If (minVal > buckets(i)) Or (buckets(i) > maxVal) Then Return false
Next i
End Function
Line 821:
Igual que la entrada de Liberty BASIC.
</pre>
=={{header|Go}}==
|