RosettaCodeData/Task/Integer-comparison/NetRexx/integer-comparison.netrexx

16 lines
447 B
Plaintext

/* 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