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

5 lines
157 B
Text

(define loop -> (if (= 10 (PRINT (random 20)))
true
(do (PRINT (random 20))
(loop))))
(loop)