RosettaCodeData/Task/Loops-Break/SNOBOL4/loops-break-2.sno
Ingy döt Net d066446780 langs a-z
2013-04-10 22:43:41 -07:00

5 lines
120 B
Text

* rand(n) -> real x | 0 <= x < n
-include 'random.sno'
loop ne(output = convert(rand(20)'integer'),10) :s(loop)
end