To check whether the given no is completely divisible by 13 or not using sub


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 GIVEN NO IS DIVISIBAL BY 13"
ELSE
PRINT"THE GIVEN NO IS NOT DIVIDIBAL BY 13"
END IF
END SUB

Comments

Post a Comment

Popular posts from this blog

                      My Journey with JM 9 years ago when I came to Jagat Mandir school, I was very scared and crying for not to get in this school.  I was new to this school, the classes,  teachers and classmates. As slowly time passed, I became close to my classmates and teachers. My journey of creating memories was started since grade 1. Many of my friends left school in between but they are still connected with us in social media. This school has not taught us only abou book study but also gave some extra knowledge and ideas which are lifelong useful for us. Now I am in grade 10 and many of the activities we performed in this school during childhood are very memorable for us. One of the energetic teacher of this school Mr. Deepak Shrestha taught us about correct meaning of friendship and togetherness. I am very grateful to my parents that they gave me chance to study in this school. As, we are together since childhood but after 10 every single student forget every single pers
Read more