When there is life there is hope.: 2019

Saturday, October 12, 2019

QBASIC to display 1, 12, 123, 1234, 12345

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

QBASIC to display 1, 1, 2, 3, 5... 10th term

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

QBASIC to print 5, 10, 15, 20... 10th term

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

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 greatest 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

Tuesday, September 3, 2019

My father

“The reason why daughter’s love their dad the most is that there is atleast once man in the world who will never hurt her.”

DADDY your guiding hand on my shoulder will remain with me forever.My father is my HERO.My father name is Karna Thapa Magar.He is 45 years old.My father is a trekking guide.He was always been there for me in very step of my life.My father is a kind gentleman and hardworking person.He helps everyone in need and also motivates me to lead a great full life.My father is very handsome.He is tall and fat.He is very intelligent and very funny.He works hard for our family .He always support me.He has sacrificed a lot for our family.My father works day and night for our family to live happily.He taught me so many things.I want to THANK him for everything he has done.

“Some people don’t believe in heroes.

They have never met my DADDY.”

Sunday, June 2, 2019

My one day with police

On the date 2019/5/30,we garde 9 student participated in public police partnership.This community works for keeping our society secure and peaceful.Police Office which is situated at RANIPOKARI, Kathmandu.All the student were very excited to go over there. It was a awareness class for student about the misuse of social media.

The class was very motivation.Nowadays,criminal are everywere.Even in the internet they are donig wrong things like spamming,hacking and even posting annoying videos. And as almost everyone nowadays have access to internet and social media we were instructed to be more aware from these kinds of activities.

All the things were relatable to many of our friends. Not only that he even gave us some solution which will help us to get out of those all problem.We should not misuse it but we can use it for many educational purpose 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.He gaves knowledge about many things which is very essentail in our 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.