Total Pageviews

Tuesday, October 1, 2019

QBASIC to print 1, 4, 9, 16... 10th term

CLS
FOR I = 1 TO 10
PRINT I ^ 2
NEXT I 
END

QBASIC to print 1, 11, 111, 1111, 11111

CLS
A = 1
FOR I = 1 TO 5
PRINT A
A = A*10+1
NEXT I
END

QBASIC to print 1, 22, 333, 4444, 55555

CLS
FOR I = 1 TO 5
FOR J = 1 TO I
PRINT I;
NEXT J
PRINT
NEXT I
END

QBASIC to disply Multiplication table

CLS
INPUT "Enter any number"; N
FOR I = 1 TO 10
PRINT N ; "X' ; I ; "=" ; N*I
NEXT I
END

QBASIC to display Factors

CLS
INPUT "Enter any number"; N
FOR I = 1 TO N
IF N MOD I = 0 THEN PRINT I
NEXT I
END

QBASIC to check Factorial

CLS
INPUT "Enter any number"; N
F = 1
FOR I = 1 TO N
F = F*I
NEXT I
PRINT "Factorial="; F
END

QBASIC to check prime or Composite

CLS
INPUT "Enter any number"; N
C = 0
FOR I = 1 TO N
IF N MOD I = 0 THEN C = C+1
NEXT I
IF C = 2 THEN
PRINT "The number is prime"
ELSE
PRINT "The number is composite"
END IF
END

QBASIc to check Armstrong or not

CLS
INPUT 'Enter any 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 "The number is armstrong"
ELSE
PRINT "The number is not armstrong"
END IF
END

QBASIC to check 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 number is palindrome"
ELSE
PRINT "The number is not palindrome"
END IF
END

QBASIC To Reverse Digits

CLS
INPUT "Enter any number"; N

S = 0
WHILE N<> 0
R = N MOD 10
S = S*10+R
N = N\10
WEND
PRINT "Reverse of digits="; S

END

QBASIC to find Product of Digits

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

QBASIC to find Sum of Digits

CLS
INPUT "Enter any number"; N

S = 0
WHILE N<> 0
R = N MOD 10
S = S+R
N = N\10
WEND
PRINT "Sum of didits="; S

END

QBASIC to print Greates among three numbers

CLS
INPUT "Enter any three number"; A, B, C
IF A>B AND A>C THEN
PRINT "The greates number is"; A

ELSEIF B>A AND B>C THEN
PRINT "The greatest number is"; B

ELSE
PRINT "The greatest number is"; C
END IF
END


QBASIC to diplay Odd or Even

CLS
INPUT "Enter any number"; N

IF N MOD 2 = 0 THEN
PRINT "The number is even"

ELSE
PRINT "The number is odd"

END IF
END

QBASIC to display Positive, Negative or Zero

CLS
INPUT "Enter any 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

QBASIC to find Volume of Cylinder

CLS
INPUT "Enter the radisu"; R

INPUT "Enter the height"; H
V =  22/7*R^2*H
PRINT "Volume of cylinder="; V
END

QBASIC to find Volume of Cube

CLS
INPUT "Enter the length"; L

V = L^3
PRINT "Volume of cube="; V
END

QBASIC to find Volume of box

CLS
INPUT "Enter the length"; L
INPUT "Enter the breadth": B
INPUT "Enter the height"; H
V = L*B*H
PRINT "Volume of box="; V
END 

QBASIC to find Area of Square

CLS
INPUT "Ente the length"; L

A = L^2
PRINT "Area of square="; A
END

QBASIC to find Area of four walls

CLS
INPUT "Enter the length"; L

INPUT "Enter the breadth"; B
INPUT "Enter the height"; H
A = 2*H*(L+B)
PRINT "Area of four walls="; A
END

Monday, September 30, 2019

QBASIC to find Area of Triangle

ClS
INPUT "Enter base"; B
INPUT "Enter height"; H
A = 1/2*B*H
PRINT "Area of triangle="; A
END

QBASIC to find Area of Circle

CLS
INPUT "Enter the radius"; R
A = 22/7*R^2
PRINT "Area of circle="; A
End

QBASIC to find Area of Rectangle

CLS
INPUT "Enter the length"; L
INPUT "Enter the breadth"; B
A = L*B
PRINT "Area of rectangle="; A
END

Sunday, September 1, 2019

My father

"Dear daddy, no matter where I go in my life, you'll always be my number one man."

Today wherever I am it's bacause of my father. I am incomplete without him. My father's name is Buddhilal Shrestha. He is 39 years old. He is role model for our family. He is kind and honest person. He fulfills all my basic needs. He care about whole the family. He always motivates me to become a successful person in future. He works day and night for my better future. A father is a person who has got a sole responsibility than others. My father is hardworking person. My father always teach me to respect seniors and love juniors. He never taught me the wrong or mischievous behaviour. He is time conscious and punctual too.

My father is the best person in my life. He is one of the best father in the whole world. Whenever I am in difficulty my father helps me out with a lot of love and affection.
 

Saturday, June 1, 2019

My one day with Police

We the students of grade 9 of Jagat Mandir School were taken to Police Office which is situated at Ranipokari, Kathmandu. All the students were very excited to go over there. We departed at 10:00 from our school. As it was a police office we all students were told to maintain silence inside the office. There a senior police officer gave us the introduction about the program. It was a awareness class for students about the misuse of social media.

He gave us knowledge about many things which is very essential in our life. All the things were relatable to many of our friends. He gave us knowledge about Cyber Crime. Not only that he even gave us some solution which will help us to get out of these all problems. as being a teenagers, I strongly agreed that most of our time is spend by using social media. It is not good to be engaged so much time in social media. We should not misuse it but we can use it for many educatinal purpose, business purose etc. As it was taught we should not use social media to harm other people. After that class we were shown the control room. All the CCTV camera photos were recorded there. After that we were taken to another place. It was the place were all the police dogs get training. Altogether there were 82 dogs in that divison. 8 breeds and 4 types of dogs were kept there. All the dogs were trained aacording to their capability. They showed us some of the dogs training. All the dogs were very sincere towards their responsibilities. We even watched the horse. On that day I 
learned many things about the Cyber Crime and Dogs. 


In coclusion, this program was very inspirational and motivational to all students.All the students were aware about the cyber crime after this visit. There we learned about cyber crime which is very important to know. There we were give n a concept of "Think Before You Click".I would thank our school and Police community partenrship for giving us this golden opportunity to visit police office and Canine Divison. After visiting there I have learned many useful and important thing which I wouldn't forget ever in my life. 









Monday, May 13, 2019

Aandhi ko Manoram Nritya

Drama is acomposition in verse or porse intended to portray life or character or to tell a story. It creates conflict of characters, particularly the ones and perform infront of audiences on the stage. Our school (Jagat Mandir) also gave us a goloden opportunity to watch drama which is based on teenagers life. Students of grade 8,9 and 10 along with 5 teachers were taken as audience. We were taken to Shilpee Theatre situated at Battisputali on 9th May, 2019. The name of our drama was "Aandhiko Manoram Nritya". The duration time of drama was One and half hour.  It was the drama based on daily struggles of adolescent.

This drama gave us the knowledge about teenagers. It was a live show. This drama showed how the teenagers are growing up with their friends in a bad company which may lead to wrong path. The problems continued when the students enter into adolescent where the mixed their feelings and mood swing ever once a while.This drama truely shows how students are involved in bad things because of peer pressure. This drama was literally related to all of the teenagers. They feel the pressure of studies and they started to do nonsense activites like smoking, taking drugs and falling in love. Nowadays, all the students are addicted to electronic gadgets instead of studying. As being a teenagers I got to know about various problems related to us.

Lastly, I am so glad that our school took us to watch this heart-touching drama. This drama was presented in a fabulous way. The actors were outstanding and their acting was marvellous. The timing and choreography was amazing. The drama has inspired many of the students. It was one of the best drama that i have ever seen in my entire life.

                             THANK YOU!!!!!