RosettaCodeData/Task/Loops-Break/SNOBOL4/loops-break-2.sno

6 lines
120 B
Text
Raw Permalink Normal View History

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