6 lines
108 B
Forth
6 lines
108 B
Forth
: loopCont
|
|
| i |
|
|
10 loop: i [
|
|
i dup print 5 mod ifZero: [ printcr continue ]
|
|
"," .
|
|
] ;
|