Check whether the no. is completely divisible by 13 or not

DECLARE SUB CHECK (N)
CLS
INPUT"ENTER ANY NUMBER"N
CALL CHECK(N)
END

SUB CHECK(N)
IF N MOD 13=0 THEN
PRINT"THE GIVEN NO. IS DIVISIBLE BY 13"
ELSE
PRINT"THE GIVEN NO. IS NOT DIVISIBLE BY 13"
END IF
END SUB

Comments

Popular posts from this blog

My experience in jagat mandir school

PERFECT SQR OR NOT

Picnic experience