Tuesday, October 1, 2019

Wap to check whether the given no. is completely divisible by 13 or not

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

SUB CHECK(N)
IF N MOD 13 = 0 THEN
PRINT"THE NO. IS COMPLETELY DIVISIBLE BY 13"
ELSE
PRINT"THE NO. IS NOT COMPLETELY DIVISIBLE BY 13'
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 ...