Tuesday, October 1, 2019

Wap to find whether the given no. is positive or negative

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 COVID-19 and the cancellation of SEE.

As we know, that this pandemic disease has started from the Wuhan district of China. This viruswvirus discovered out on 31st December 2019 ...