My journy with Jagat Mandir

10 years of journy with JM

it was the most important day of my life i spend my 10 years with this school . I am so happy that i could spend my this years with my friend and teachers . I have made so many memories with in this years . When i came at this school i was at 1 class i still remember that old days where we used to play ,study and have many fun. 

At class 4 it was the most memorable day of my life . I still remember siddhartha who was my best friend in that day he left school due to the some problem . I was sad but i still  got my friends who always support me in every situation.  i will miss them all even i will left this school in coming days . but i still got my beautiful memories which is very important for me. Special thank you for all my friends and teachers . 

Picnic Experience

it was the special day on the 26th magh for all the class 10 because on this day school organised a picnic for us. we were planning to move at 7 30 am but due to some problems we move at 8 30 am .it was already 1 hours we reached at 9 35 am then we made our break fast ready. after that we washed our own dishes.then we enjoyed like singing, dancing and others.
then we moved at 5 30 pm we enjoyed so much we arived at 6 30 pm it was the most memorable day of my life . i wiss that we can again go to picnic with all my friends and teachers . 

Program to find average of 3 numbers using FUNCTION

Program to find average of 3 numbers using FUNCTION

DECLARE FUNCTION AVG(A,B,C)
CLS
INPUT"ENTER ANY THREE NUMBERS";A,B,C
PRINT"Average of three numbers=";AVG(A,B,C)
END

FUNCTION AVG(A,B,C)
AV=(A+B+C)/3
AVG=AV
END FUNCTION

Program to find total no. of vowels in a given word using SUB

Program to find total no. of vowels in a given word using SUB

DECLARE SUB DISPLAY(N$)
CLS
INPUT"ENTER ANY WORD";N$
CALL DISPLAY(N$)
END

SUB DISPLAY(N$)
FOR I= 1 TO LEN(N$)
B$= MID$(N$,I,1)
C$= UCASE$(B$)
IF C$="A" OR C$="E" OR C$="E" OR C$="I" OR C$="O" OR C$="U" THEN D$=D$+B$
NEXT I
PRINT"VOWELS=";D$
END SUB

Program to find area of circle using SUB

Program to find area of circle using SUB

DECLARE SUB AREA(R)
CLS
INPUT"ENTER RADIUS";R
CALL AREA(R)
END

SUB AREA(R)
A= 22/7*R^2
PRINT"Area of circle=";A
END SUB

Program to find area of 4 walls using SUB

Program to find area of 4 walls using SUB

DECLARE SUB AREA(L,B,H)
CLS
INPUT"ENTER LENGTH":L
INPUT"ENTER BREADTH";B
INPUT"ENTER HEIGHT";H
CALL AREA(L,B,H)
END

SUB AREA(L,B,H)
A=2*H*(L+B)
PRINT"Area of 4 walls=";A
END SUB

Program to find total no. of vowels in a word using FUNCTION

Program to find total no. of vowels in a word using FUNCTION

DECLARE FUNCTION COUNT(N$)
CLS
INPUT"ENTER ANY WORD";N$
PRINT"Total no. of vowels=";COUNT(N$)
END

FUNCTION COUNT(N$)
C=0
FOR I= 1 TO LEN$(N$)
B$= MID$(N$,I,1)
C$=UCASE$(B$)
IF C$="A" OR C$="E" OR C$="I" OR C$="O" OR C$="U" THEN C=C+1
NEXT I
COUNT=C
END FUNCTION