RosettaCodeData/Task/Loops-Continue/Factor/loops-continue.factor

5 lines
87 B
Factor
Raw Permalink Normal View History

2013-04-10 21:29:02 -07:00
1 10 [a,b] [
[ number>string write ]
[ 5 mod 0 = "\n" ", " ? write ] bi
] each