Display positive negative or zero

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