CLS
INPUT "Enter length";L
INPUT "Enter breadth";B
A = L * B
PRINT " area of rectangle";A
END
Search This Blog
Monday, October 14, 2019
2.To Find area of circle
CLS
INPUT " Enter radius";R
C = 22 / 7 * R ^ 2
PRINT " area of circle";C
END
INPUT " Enter radius";R
C = 22 / 7 * R ^ 2
PRINT " area of circle";C
END
3. To Find area of triangle
CLS
INPUT "Enter breadth"; B
INPUT "Enter height"; H
A = 1 / 2 * (B * H)
PRINT "area of triangle"; A
END
5. To Display area of four walls
CLS
INPUT “Enter length”; L
INPUT “Enter breadth”; B
INPUT “Enter height”; H
A = 2 * H * (L + B)
PRINT “Area of four walls“; A
END
6. To Display Volume of box
CLS
INPUT "Enter length";L
INPUT "Enter breadth";B
INPUT "Enter height";H
V = L * B * H
PRINT "Volume of box";V
END
INPUT "Enter length";L
INPUT "Enter breadth";B
INPUT "Enter height";H
V = L * B * H
PRINT "Volume of box";V
END
8. To Display Volume of Cylinder
CLS
INPUT "Enter radius";R
INPUT "Enter Height";H
V = 22 / 7 * R ^ 2 * H
PRINT "Volume of cylinder";V
END
INPUT "Enter radius";R
INPUT "Enter Height";H
V = 22 / 7 * R ^ 2 * H
PRINT "Volume of cylinder";V
END
9. To Display Positive Negative or Zero
CLS
INPUT "Enter a number";N
IF N > 0 THEN
PRINT "The number is Positive"
ELSEIF N < 0 THEN
PRINT "The number is Negative"
ELSE
PRINT "The number is Zero"
END IF
END
10. To Display Odd or Even
CLS
INPUT "Enter a number: ", N
IF N MOD 2 = 0 THEN
PRINT "The number is EVEN."
ELSE
PRINT "The number is ODD."
END IF
END
INPUT "Enter a number: ", N
IF N MOD 2 = 0 THEN
PRINT "The number is EVEN."
ELSE
PRINT "The number is ODD."
END IF
END
11. To Display greater among three number
CLS
INPUT " Enter and three number " ; N
IF A > B AND B > C THEN
PRINT "Greater number is "; A
ELSEIF B > A AND B > C THEN
PRINT "Greater number is ": B
ELSE
PRINT "Greater number is ";C
END IF
END
INPUT " Enter and three number " ; N
IF A > B AND B > C THEN
PRINT "Greater number is "; A
ELSEIF B > A AND B > C THEN
PRINT "Greater number is ": B
ELSE
PRINT "Greater number is ";C
END IF
END
12. To Display Sum of digit
CLS
INPUT "Enter any digit"; N
S = 0
WHILE N <> 0
R = N MOD 10
S = S + R
N = N \ 10
WEND
PRINT "Sum of digits is "; S
END
INPUT "Enter any digit"; N
S = 0
WHILE N <> 0
R = N MOD 10
S = S + R
N = N \ 10
WEND
PRINT "Sum of digits is "; S
END
13. To Display Product of digit
CLS
INPUT "ENTER ANY NUMBER"; N
P = 1
WHILE N < > 0
R = N MOD 10
P = P * R
N = N \ 10
WEND
PRINT "PRODUCT OF DIGITS"; P
END
14. To Display reverse digit
CLS
INPUT "Enter any number"; N
S = 0
WHILE N <> 0
R = N MOD 10
S = S * 10 + R
N = N \ 10
WEND
PRINT "Reversed digits is "; S
END
INPUT "Enter any number"; N
S = 0
WHILE N <> 0
R = N MOD 10
S = S * 10 + R
N = N \ 10
WEND
PRINT "Reversed digits is "; S
END
15. To Display the given number is palindrome or not
CLS
INPUT "Enter any number"; N
A = N
S = 0
WHILE N <> 0
R = N MOD 10
S = S * 10 + R
N = N \ 10
WEND
IF A = S THEN
PRINT"the given number is palindrome"
ELSE
PRINT"the given number is not palindrome"
END IF
END
INPUT "Enter any number"; N
A = N
S = 0
WHILE N <> 0
R = N MOD 10
S = S * 10 + R
N = N \ 10
WEND
IF A = S THEN
PRINT"the given number is palindrome"
ELSE
PRINT"the given number is not palindrome"
END IF
END
Sunday, October 13, 2019
16. To Display armstrong
CLS
INPUT "Enter a number"; N
A = N
S = 0
WHILE N <> 0
R = N MOD 10
S = S + R ^ 3
N = N \ 10
WEND
IF A= S THEN
PRINT "It is armstrong number";
ELSE
PRINT "It is not armstrong number";
END IF
END
INPUT "Enter a number"; N
A = N
S = 0
WHILE N <> 0
R = N MOD 10
S = S + R ^ 3
N = N \ 10
WEND
IF A= S THEN
PRINT "It is armstrong number";
ELSE
PRINT "It is not armstrong number";
END IF
END
17. To Display Prime or Composite
CLS
INPUT "ENTER ANY NUMBER"; N
C = 0
FOR I = 1 TO N
FOR I = 1 TO N
IF N MOD I = 0 THEN C = C + 1
NEXT I
IF C = 2 THEN
PRINT N; "IS PRIME NUMBER"
ELSE
PRINT N; "IS COMPOSITE NUMBER"
END IF
END
18. To Display Factor
CLS
INPUT "Enter any number";N
FOR I = 1 To N
IF N MOD I = 0 THEN PRINT I
NEXT I
END
INPUT "Enter any number";N
FOR I = 1 To N
IF N MOD I = 0 THEN PRINT I
NEXT I
END
19. To Display Factorial number
CLS
INPUT "Enter any number";N
F = 1
FOR I = 1 To N
F = F * I
NEXT I
PRINT "Factorial number";F
END
INPUT "Enter any number";N
F = 1
FOR I = 1 To N
F = F * I
NEXT I
PRINT "Factorial number";F
END
20. To Display multiplication table
CLS
INPUT "Enter any number"; N
FOR I = 1 TO 10
PRINT N; " X " ; I ; " = " ; N * I
NEXT I
END
INPUT "Enter any number"; N
FOR I = 1 TO 10
PRINT N; " X " ; I ; " = " ; N * I
NEXT I
END
21. To Display 1,1,2,3,5,8....10th term
CLS
A = 1
B = 1
FOR I = 1 To 10
C = A + B
A = B
B = C
NEXT I
END
A = 1
B = 1
FOR I = 1 To 10
C = A + B
A = B
B = C
NEXT I
END
25. To Display 1,22,333,4444,55555
CLS
FOR I = 1 To 5
FOR J = 1 To I
PRINT I;
NEXT J
PRINT
NEXT I
END
FOR I = 1 To 5
FOR J = 1 To I
PRINT I;
NEXT J
NEXT I
END
Monday, September 2, 2019
My Father
My Father
My father is also an ideal person of my life. He is my real hero and my best friend ever. He always helps me a lot in my any difficulty. He is an internet marketing manager in a limited company in New Delhi. He is very famous person in his office as well as in the society because of his gentleness and politeness.He is very intelligent man and always helps others in their problems. He is the boss of my family and gives advice and instruction to every family member. He solves problems of the neighbours. My father is very kind-hearted person and my real hero and best friend. He always shares with me his all the bad an happy moments. He tells me that he discuss his all life events to me to give me experience and take right steps in the absence of him. My father is very lovely father of the world. He is my real hero, best friend, my inspiration and best person of my life I ever seen. He is the person who helps me a lot in getting prepared for the school, getting rise of the bed and getting my home work done well.
Sunday, June 2, 2019
EXPERIENCE OF POLICE COMMUNITY
On the day of Thursday 2076/2/16 our school take the student of grade 9 in police office (Police community) to learn about police community and job. The was a police man who welcome us in police office and told us some major problem of Nepal and and teach us what to if any accident happen. he also teach us some things like ,The ability of the police to perform their duties effectively and efficiently not only strengthens democracy but also reassures the quality of life essential for any citizen. After the police man speak he show's us some video about cyber crime occurred in Nepal. He also told us a story related to cyber crime.After the presentation finish we have some tea and went to control room there were many computer and when i saw at the left side i saw a huge screen were the CCTV camera was recording.In that screen we see the old accident .
We click some group photo and we went to bus to see dog skills in Police area. We went there and there were around 15 -10 dogs and 5 -6 horses. In that area there were 8 different breed of dog and 4 subject of dog one is to search boom one is to search the victim killer one is to search drugs .AT the end we saw a dog obeying his master it was kind a fun to watch.
We have so much fun we saw so many new things.
"THANK YOU"... . . .
We have so much fun we saw so many new things.
"THANK YOU"... . . .
Wednesday, May 15, 2019
" आँधिको मनोरम नृत्य"
Drama is the specific mode of fiction represented in performance.
Drama help us to understand the felling of that person who have suffered various of different problem. Drama is also for entertainment. Drama make us cry, laugh and many other. Drama give us skill information and many other. Drama is a kind of activity for all specially for teenager. It give so knowledge about what to do , what to not do, what is right and what is wrong.
On the date of 2019/5/9 our school take the student of grade 8,9 and 10 to see the drama Adhiko Manoram.
It give us various of information like being in the stage of teen we should control our behaviour like smoking,fighting,involving in sex activity and many other.
This drama was for teenager to understand the bad activity in adolescent.
Subscribe to:
Posts (Atom)