RosettaCodeData/Task/Loops-Break/NewLISP/loops-break.l
2023-07-01 13:44:08 -04:00

2 lines
57 B
Common Lisp

(until (= 10 (println (rand 20)))
(println (rand 20)))