Thursday, October 3, 2019

Positive or negative.(SUB)

DECLARE SUB CHECK(N)
CLS
INPUT"ENTER ANY NO.";N
CALL CHECK(N$)
END

SUB CHECK(N)
IF N > 0 THEN
PRINT"POSITIVE NO."
ELSE IF N  < 0 THEN
PRINT"NEGATIVE NO."
ELSE
PRINT"ZERO"
END IF
END SUB

No comments:

Post a Comment

Experience of Quarantine and SEE canceled

Our SEE was canceled due to the outbreak of Corona Virus (COVID-19). It's been 3 months since the Nepalese people have been staying home...