QBasic Programming

To find the positive, negative or zero

CLS
INPUT "Enter any number ";N
IF N >0 THEN 
PRINT "The number is positive "
ELSE IF N < 0 THEN
PRINT "The number is negative "
ELSE 
PRINT "The number is zero "
END IF
END