RosettaCodeData/Task/Loops-Continue/PicoLisp/loops-continue.l

6 lines
79 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
(for I 10
(print I)
(if (=0 (% I 5))
(prinl)
(prin ", ") ) )