CLS
FOR I = 1 TO 5
FOR J = 1 TO I
PRINT J ;
NEXT J
PRINT
NEXT I
END
Saturday, October 12, 2019
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
FOR I = 1 TO 5
FOR J = 1 TO I
NEXT I ;
NEXT J
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
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
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
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
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
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
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
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
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
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
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
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
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
INPUT "Enter the radisu"; R
INPUT "Enter the height"; H
V = 22/7*R^2*H
PRINT "Volume of cylinder="; V
END
BASIC 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
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 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
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
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
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
INPUT "Enter the radius"; R
A = 22/7*R^2
PRINT "Area of circle="; A
End
BASIC 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
INPUT "Enter the length"; L
INPUT "Enter the breadth"; B
A = L*B
PRINT "Area of rectangle="; A
END
Wednesday, September 4, 2019
My Father.
An important person in my life is my father. He is the best. He provides me what I want and need. For instance, money matters, education situations, and necessaries and luxuries, my needs and wants. He teaches me “the ways” to be a better person and to be a better citizen in life. He speaks of the ways of life that should be the good deeds that shall be done, from right to wrong and life lectures and lessons. His personality and attitude is magnificent. It would take a life time to explain every single detail. My dad is my life. I live my life to make him proud that he has a son like me. He is my everything.
first of all, my dad provides me about everything I ask for, but I should be reasonable. He gives me things from what's necessary in life to luxurious things. He gives me money and I wouldn't even have to ask for it. If I do, he never questions me why. He pays for everything too. From educated related things to things I just want. Such as shoes, clothes, electronics, etc. If I ask, I can get it, depending whether it’s the right time and the right thing to ask for. It’s amazing how he can manage. He's a one man dude. He has to pay for the house bill, lights, , food, everything basically, but he's still able to make room for me, his son. I don't ever think there was ever a time he has ever failed my request. I asked for him to pay for boxing and he paid for it. He is a real hero of my life .
first of all, my dad provides me about everything I ask for, but I should be reasonable. He gives me things from what's necessary in life to luxurious things. He gives me money and I wouldn't even have to ask for it. If I do, he never questions me why. He pays for everything too. From educated related things to things I just want. Such as shoes, clothes, electronics, etc. If I ask, I can get it, depending whether it’s the right time and the right thing to ask for. It’s amazing how he can manage. He's a one man dude. He has to pay for the house bill, lights, , food, everything basically, but he's still able to make room for me, his son. I don't ever think there was ever a time he has ever failed my request. I asked for him to pay for boxing and he paid for it. He is a real hero of my life .
Sunday, June 9, 2019
My one day with police
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.
We were taken for a short class about cyber crime. They told us some important things about cyber crime. Cyber crime are the criminal activities on the computer and internet. Nowadays, criminal are are everywhere. Even in the internet they are doing wrong things like hacking, spamming 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. We were told not to be involved in these activities and also not kepping ourself safe from the hackers and criminals. We should not talk with strangers and also not accept their request. They also told us to be aware from sexting, sextorturing, blackmailing, phising and so on.
After this class we were taken to their control room. There we were shown some footages of accidents also. They showed us how they observe the accidents and criminal activities for investigations. And after a short while, we were taken to observe the police dogs and horses too. Seeing them was soo entertaining. There were different trained dogs and horses. They were classified into different groups like narcotic dogs, bomb dogs, tracker dogs and rescue dogs. They even showed us their skills. All of them were disciplined.
At last i want to say that 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.this program was very motivational for all of us. Seeing our nations police forces work hardly was overwhelming and really inspirational. I hope these type of educations be shared to everyone.
thank you .......
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.
We were taken for a short class about cyber crime. They told us some important things about cyber crime. Cyber crime are the criminal activities on the computer and internet. Nowadays, criminal are are everywhere. Even in the internet they are doing wrong things like hacking, spamming 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. We were told not to be involved in these activities and also not kepping ourself safe from the hackers and criminals. We should not talk with strangers and also not accept their request. They also told us to be aware from sexting, sextorturing, blackmailing, phising and so on.
After this class we were taken to their control room. There we were shown some footages of accidents also. They showed us how they observe the accidents and criminal activities for investigations. And after a short while, we were taken to observe the police dogs and horses too. Seeing them was soo entertaining. There were different trained dogs and horses. They were classified into different groups like narcotic dogs, bomb dogs, tracker dogs and rescue dogs. They even showed us their skills. All of them were disciplined.
At last i want to say that 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.this program was very motivational for all of us. Seeing our nations police forces work hardly was overwhelming and really inspirational. I hope these type of educations be shared to everyone.
thank you .......
Monday, May 13, 2019
Adhiko manoram Nritya
Adhiko Manoram Nritya .
Drama is a composition in verse or porse intended to portray
life or character or to tell a story.it usually involves conflicts
and emotion through action and dialogue and is typically
designed for theatrical performance.This was the first live drama experienced by Me. We all the students were very excited. We reached there after 20 minutes walk from the school. The theatre was nice and well maintained. There were also ACs and fans.
we grade 8,9 and 10 were taken to observe a drama named "Adhiko Manoram Nritya" on the date 2019/5/9. This drama gave us the education about us(teens).It showed us the things we go through in this stage. It was based on teens love stories, the bad cultures they are following, our society and bad company. It shows how teens engage in bad thing. They involve in those things not only because of themselves but also because of peer pressure. Even their closest friend ask them to do bad things like smoking, drinking,etc. Likewise, falling in love in thier early age and destroying their whole life. It also reflects how our society is truly like. An old man sexually harassing a girl with an age of her daughter, it is the worst. This drama shows how much we teens are addicted to mobiles and laptops without studying. Instead of involving in good thing we are getting involved into bad things. We are having fun now not knowing about how our future will be.
The drama was based on the problems faced by the today's teenagers and adolescents. All the actors acting were superb. They spoke their lines so smoothly. One of the sister's acting made me literally to cry. The drama was funny, emotional as well as motivational.
lastly this drama has a lot of thing to teach . it is a really heart touching drama .We can see many teenagers having the same problem shown in the drama. Many of the teenagers fall in love, start smoking, fight etc all due to the adolescence. Due to the adolescence, teenagers mostly love to spend their time with friends rather than their parents and this may take them to wrong way and involve in bad activities.
Drama is a composition in verse or porse intended to portray
life or character or to tell a story.it usually involves conflicts
and emotion through action and dialogue and is typically
designed for theatrical performance.This was the first live drama experienced by Me. We all the students were very excited. We reached there after 20 minutes walk from the school. The theatre was nice and well maintained. There were also ACs and fans.
we grade 8,9 and 10 were taken to observe a drama named "Adhiko Manoram Nritya" on the date 2019/5/9. This drama gave us the education about us(teens).It showed us the things we go through in this stage. It was based on teens love stories, the bad cultures they are following, our society and bad company. It shows how teens engage in bad thing. They involve in those things not only because of themselves but also because of peer pressure. Even their closest friend ask them to do bad things like smoking, drinking,etc. Likewise, falling in love in thier early age and destroying their whole life. It also reflects how our society is truly like. An old man sexually harassing a girl with an age of her daughter, it is the worst. This drama shows how much we teens are addicted to mobiles and laptops without studying. Instead of involving in good thing we are getting involved into bad things. We are having fun now not knowing about how our future will be.
The drama was based on the problems faced by the today's teenagers and adolescents. All the actors acting were superb. They spoke their lines so smoothly. One of the sister's acting made me literally to cry. The drama was funny, emotional as well as motivational.
lastly this drama has a lot of thing to teach . it is a really heart touching drama .We can see many teenagers having the same problem shown in the drama. Many of the teenagers fall in love, start smoking, fight etc all due to the adolescence. Due to the adolescence, teenagers mostly love to spend their time with friends rather than their parents and this may take them to wrong way and involve in bad activities.
Subscribe to:
Posts (Atom)