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

11 lines
158 B
Text

PROCEDURE Compare( a, b )
IF a < b
? "A is less than B"
ELSEIF a > b
? "A is more than B"
ELSE
? "A equals B"
ENDIF
RETURN