RosettaCodeData/Task/Loops-Continue/Factor/loops-continue.factor
2023-07-01 13:44:08 -04:00

4 lines
87 B
Factor

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