RosettaCodeData/Task/Loops-Do-while/PicoLisp/loops-do-while-3.l

2 lines
47 B
Common Lisp

(for (Val 0 (n0 (% (println (inc 'Val)) 6))))