9 lines
244 B
Text
9 lines
244 B
Text
DLG(NameEdit=a, NameEdit=b, Button='OK')
|
|
|
|
IF (a < b) THEN
|
|
WRITE(Messagebox) a, ' is less than ', b
|
|
ELSEIF(a == b) THEN
|
|
WRITE(Messagebox) a, ' is equal to ', b
|
|
ELSEIF(a > b) THEN
|
|
WRITE(Messagebox) a, ' is greater than ', b
|
|
ENDIF
|