RosettaCodeData/Task/Integer-comparison/DCL/integer-comparison.dcl
2023-07-01 13:44:08 -04:00

5 lines
285 B
Text

$ inquire a "Please provide an integer"
$ inquire b "Please provide another"
$ if a .lt. b then $ write sys$output "the first integer is less"
$ if a .eq. b then $ write sys$output "the integers have the same value"
$ if a .gt. b then $ write sys$output "the first integer is greater"