QBASIC

WAP TO DISPLAY ODD OR EVEN

CLS

INPUT "Enter any number"; N

IF N MOD 2 = 0 THEN

PRINT "The number is even"

ELSE

PRINT "The number is odd"

END IF

END