6 lines
257 B
Rexx
6 lines
257 B
Rexx
/*REXX program demonstrates a DO UNTIL construction. */
|
|
|
|
do v=1 until v//6==0 /*REXX // is the ÷ remainder.*/
|
|
say v
|
|
end
|
|
/*stick a fork in it, we're done.*/
|