My JM Experience
Starting high school is both exciting and scary for a lot of teens, especially if you are heading to a new school where you might not know a lot of people. I’m going to be honest: of all three years of high school, Grade 10 was definitely the worst for me. This isn’t because Grade 10 is actually bad, but because I focused all of my energy on things that – looking back – I’ve come to realize actually weren’t so important in the end, and that caused me a lot of unnecessary stress at the time.
i came jagat mandir at class 2 .The very first day I still remeber entering jagat mandir , murari sir guided me towards the school.firstly I mate with mingma dorje and in Jm .I kept my bag and went for assembly. After assembly was over .The first period was of khem sir .After few month I mate with my new friend barun thanet .He was good boy with good thought and idea . I Dont know how 3 yrs spend fast .
had seen changes in the teaching learning of my school which has made my studies improve. JM has not only focused on the students academics but also in the sports. They have given their best to provide best facility to their students for their better result. Our school is not only based on theoretical but also in practical which has been a great way to study and learn new things.The teachers are very friendly towards all the students. JM has build up my confidence to perform and face mass audience during the stage performance.
But journey with jagat mandir school is very memorable and awesome . it was the best moment.
INPUT"ENTER RADIUS";R
CALL CIRCLE(R)
END
SUB CIRCLE(R)
C=2*22/7*R
PRINT"CIRCUMFERENCE OF CIRCLE=";C
END SUB
CLS
INPUT"ENTER LENGTH";L
INPUT"ENTER BREADTH";B
INPUT"ENTER HEIGHT";H
PRINT"VOLUME OF BOX=";VOL(L,B,H)
END
FUNCTION VOL(L,B,H)
V=L*B*H
VOL=V
END FUNCTION
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$="I" OR C$="O" OR C$="U" THEN D$=D$+B$
NEXT I
PRINT"VOWELS="D$
END SUB
CLS
INPUT"ENTER ACCELERATION",A
INPUT"ENTER INITIAL VELOCITY";U
INPUT"ENTER TIME";T
PRINT"DISTANCE TRAVELLED=";DISTANCE(A,U,T)
END
FUNCTION DISTANCE(A,U,T)
S=U*T+1/2*A*T^2
DISTANCE=S
END FUNCTION
Program to find area if 4 walls using FUNCTION
CLS
INPUT"ENTER LENGTH";L
INPUT"ENTER BREADTH";B
INPUT"ENTER HEIGHT";H
AR=AREA
PRINT"Area of 4 walls=";AREA(L,B,H)
END
FUNCTION AREA(L,B,H)
AREA=2*H*(L+B)
END FUNCTION
Program to find circumference of circle using SUB
INPUT"ENTER RADIUS";R
CALL CIRCLE(R)
END
SUB CIRCLE(R)
C=2*22/7*R
PRINT"CIRCUMFERENCE OF CIRCLE=";C
END SUB
Program to find whether the given no. is divisible by 13 or not using SUB
Program to find volume of box using FUNCTION
CLS
INPUT"ENTER LENGTH";L
INPUT"ENTER BREADTH";B
INPUT"ENTER HEIGHT";H
PRINT"VOLUME OF BOX=";VOL(L,B,H)
END
FUNCTION VOL(L,B,H)
V=L*B*H
VOL=V
END FUNCTION
Program to print only vowels from given word using SUB
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$="I" OR C$="O" OR C$="U" THEN D$=D$+B$
NEXT I
PRINT"VOWELS="D$
END SUB
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$="I" OR C$="O" OR C$="U" THEN D$=D$+B$
NEXT I
PRINT"VOWELS="D$
END SUB
Program to calculate distance using FUNCTION
CLS
INPUT"ENTER ACCELERATION",A
INPUT"ENTER INITIAL VELOCITY";U
INPUT"ENTER TIME";T
PRINT"DISTANCE TRAVELLED=";DISTANCE(A,U,T)
END
FUNCTION DISTANCE(A,U,T)
S=U*T+1/2*A*T^2
DISTANCE=S
END FUNCTION
Program to print simple interest using FUNCTION
CLS
INPUT"ENTER PRINCIPLE";P
INPUT"ENTER TIME"T
INPUT"ENTER RATE";R
PRINT"Simple Interest=";SIMPLE(P,T,R)
END
FUNCTION SIMPLE(P,T,R)
S=(P*T*R)/100
SIMPLE=S
END FUNCTION
Program to check whether the given word is palindrome string or not using FUNCTION
CLS
INPUT"ENTER ANY WORD";N$
P$=PAL$(N$)
IF N$=P$ THEN
PRINT"The given word is palindrome"
ELSE
PRINT"The given word is not palindrome"
END
FUNCTION PAL$(N$)
FOR I= LEN$(N$) TO 1 STEP -1
B$= MID$(N$,I,1)
C$=C$+B$
NEXT I
PAL$=C$
END FUNCITON
Program to check whether the given no is armstrong number or not using FUNCTION
CLS
INPUT"ENTER ANY NUMBER";N
A=P
P=ARM
IF A=P THEN
PRINT"The given no is armstrong"
ELSE
PRINT"The given no is not armstrong"
END IF
END
FUNCTION ARM(N)
S=0
WHILE N<>0
R=N MOD 10
S=S+R^3
N=N\10
WEND
ARM=S
END FUNCTION
Program to find the factors of a number using FUNCTION
CLS
INPUT"ENTER ANY NUMBER";N
PRINT"FACTOR=";FACT(N)
END
FUNCTION FACT(N)
FOR I= 1 TO N
IF N MOD I=0 THEN
PRINT I
NEXT I
END FUNCTION