RosettaCodeData/Task/Loops-Continue/Factor/loops-continue.factor
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

4 lines
87 B
Factor

1 10 [a,b] [
[ number>string write ]
[ 5 mod 0 = "\n" ", " ? write ] bi
] each