CLS
INPUT "Enter the length"; L
INPUT "Enter the breadth"; B
A = L*B
PRINT "Area of rectangle="; A
END
Friday, October 4, 2019
Qbasic to print 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
Qbasic to print area of trangLe
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 print area of 4 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 print 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 print 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
Qbasic to check no is 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 check no is 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 print greatest among three no
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 display sum of digit
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 display products 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 display reverse digit
Q-Basic 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 "Reverse of digits="; S
END
Qbasic program to check given no 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 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 program to check no is 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 program to check given no is 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 program to display factors
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 program 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 program to print 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 program 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
FOR I = 1 TO 5
FOR J = 1 TO I
PRINT I;
NEXT J
NEXT I
END
Wednesday, September 4, 2019
My Father
My father name is Sujan Ram Bhattarai. He is 40 years old. He is a gentle man.
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.
He is very polite and peaceful person. He scolded me and but takes my all mistakes very easily and makes me realize my all mistakes very politely. He helps each and every family member to take good decision in the bad time. He always shares his life drawbacks and achievements with me to let us know. He has his own business of online marketing but never force me to do go in the same field or attract me towards his own business instead he always promote to do what I want in my life.
My father name is Sujan Ram Bhattarai. He is 40 years old. He is a gentle man.
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.
He is very polite and peaceful person. He scolded me and but takes my all mistakes very easily and makes me realize my all mistakes very politely. He helps each and every family member to take good decision in the bad time. He always shares his life drawbacks and achievements with me to let us know. He has his own business of online marketing but never force me to do go in the same field or attract me towards his own business instead he always promote to do what I want in my life.
My father is hero for me,
My father is hero for me,
Infront of him all are zero for me.
He cries whenever I cry,
He cries whenever I cry,
He will also die if I will dieThursday, May 30, 2019
Visit to police office and dog tranning center of police.
Firstly, we visited to police office which is in Rani Pokahari. We visit there and learn many things about police.
We learn there that what ever we think negatively about the police that's all wrong. Police are the one important organ of the government which helps to maintain peace and security in our society or community. We also learn about the maNY illegal activities what we should not do. Some of them are cyber crime, domestic violence, discrimination and others. After visiting there we went to dogs tranning center of police, there we saw that different kinds of the dogs are being trained for the peace and security of our country. There the think I most like is that one dog which was trained to be well discipline ,that dog did namaste, salut and does what his tanner said to him. So from that I also learn that we should we well disinclined and we should obey our mentor.
By visiting both police office and dog tranning center I felt that police are not too rood we think but they are friendly. And the dogs tranning center was also the one important organ of government which trains dogs for peace and security of our country
Firstly, we visited to police office which is in Rani Pokahari. We visit there and learn many things about police.
We learn there that what ever we think negatively about the police that's all wrong. Police are the one important organ of the government which helps to maintain peace and security in our society or community. We also learn about the maNY illegal activities what we should not do. Some of them are cyber crime, domestic violence, discrimination and others. After visiting there we went to dogs tranning center of police, there we saw that different kinds of the dogs are being trained for the peace and security of our country. There the think I most like is that one dog which was trained to be well discipline ,that dog did namaste, salut and does what his tanner said to him. So from that I also learn that we should we well disinclined and we should obey our mentor.
By visiting both police office and dog tranning center I felt that police are not too rood we think but they are friendly. And the dogs tranning center was also the one important organ of government which trains dogs for peace and security of our country
Saturday, May 11, 2019
Experience on the drama, aadhi ko manorum nittya.
On 2076/1/26 our school take us to watch a beautiful drama named aadhi ko manorum nittya on selpy hal in batis putali , Kathmandu.
It was really to good to watch that drama named aadhi ko manorum nittya. On my experience of view that drama was especially for students because by looking that students will learn that they are doing many wrong things which they should not do and also by looking that drama they also came to know that if we do wrong things what will be happen.
So, in my opinion students should watch the drama named aadhi ko manorum nittya because it will teach them about the right or wrong.
At last I want to write that the drama was to.... good............ ..................
Subscribe to:
Posts (Atom)
Peer to Peer Network
Peer to Peer Network Peer-to-Peer is a network model in which each computer can function as both a client and a server. Any computer in th...
-
My experience on tour to Dhading Our school was going to take tour to Dhading and I was too excited to go there and enjoy with my fr...
-
Pros and cons of online education Nowadays, corona virus has affect the whole which has forced stopped the public sectors like parks , sc...
-
Teej Teej is the festable of girls. girls dance, sing,and do many more things. it is seen a...