WAP to input any number and check positive or negative or zero

CLS
INPUT " Enter any  number ";N
IF N =0 THEN
PRINT "Positive number "
ELSE IF N < 0 THEN
PRINT "Negative number "
ELSE
PRINT "Zero"
END IF
END