15 lines
447 B
Text
15 lines
447 B
Text
/* NetRexx */
|
|
options replace format comments java crossref symbols nobinary
|
|
|
|
numL = 0
|
|
numR = 0
|
|
loop label running forever
|
|
say 'Provide two integers [or anything else to stop]:'
|
|
parse ask numL numR .
|
|
if \numL.datatype('w') | \numR.datatype('w') then leave running
|
|
if numL < numR then say numL 'is less than' numR
|
|
if numL = numR then say numL 'is equal to' numR
|
|
if numL > numR then say numL 'is greater than' numR
|
|
end running
|
|
|
|
return
|