RosettaCodeData/Task/Loops-Continue/NewLISP/loops-continue.newlisp

6 lines
81 B
Plaintext

(for (i 1 10)
(print i)
(if (= 0 (% i 5))
(println)
(print ", ")))