Problem Statement

Show the following output using one loop.

Try to achieve the result by forcing the next iteration within the loop upon a specific condition, if your language allows it.

Let's start with the solution:

: loopCont 
| i | 
   10 loop: i [ 
      i dup print 5 mod ifZero: [ printcr continue ]
      "," . 
      ] ;