RosettaCodeData/Task/Loops-Break/PicoLisp/loops-break-2.l
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

2 lines
63 B
Common Lisp

(until (= 10 (println (rand 1 19)))
(println (rand 1 19)) )