17 lines
398 B
Text
17 lines
398 B
Text
/* NetRexx */
|
|
options replace format comments java crossref symbols nobinary
|
|
|
|
checkVal = 75000
|
|
say 'Input a string then the number' checkVal
|
|
parse ask inString
|
|
parse ask inNumber .
|
|
|
|
say 'Input string:' inString
|
|
say 'Input number:' inNumber
|
|
if inNumber == checkVal then do
|
|
say 'Success! Input number is as requested'
|
|
end
|
|
else do
|
|
say 'Failure! Number' inNumber 'is not' checkVal
|
|
end
|
|
return
|