17 lines
272 B
Text
17 lines
272 B
Text
|
/* NetRexx */
|
||
|
|
options replace format comments java crossref savelog symbols nobinary
|
||
|
|
|
||
|
|
say
|
||
|
|
say 'Loops/Continue'
|
||
|
|
|
||
|
|
nul = '\-'
|
||
|
|
loop i_ = 1 to 10
|
||
|
|
say i_.right(2) || nul
|
||
|
|
if i_ // 5 = 0 then do
|
||
|
|
say
|
||
|
|
iterate i_
|
||
|
|
end
|
||
|
|
say ', ' || nul
|
||
|
|
|
||
|
|
end i_
|