12 lines
158 B
Text
12 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
|