QBASIC PROJECT WORK

 1. WAP to input number and check whether the given no. is divisible by 3 and 7 or not.

Ans:
          CLS
          INPUT  "Enter any number";n
          IF  n  MOD  3 =0  AND  n  MOD  7=0 THEN
          PRINT  "The number is divisible by 3 and 7"
          ELSE  
          PRINT  "The given number is not divisible by 3 and 7"
          END IF
          END


2. WAP to input any number and check whether the given no.is positive or negative. 

Ans:
          CLS 
          INPUT  "Enter any number";n
          IF n>0 THEN
          PRINT  "the given number is positive"
          ELSEIF n=0 THEN
          PRINT  "the given number is zero"
          ELSE
          PRINT  "the given number is negative"
          END IF
          END

3. WAP to input any number and display whether it is odd or even. 

Ans:
          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 


4. WAP to enter any two number and display the smaller one . 

Ans:
          CLS 
          INPUT  "Enter any two number";A,B 
          IF  A < B  THEN 
          PRINT  "The smallest number is";A 
          ELSE 
          PRINT  "The smallest number is";B 
          END IF 
          END 


5. WAP to enter any three numbers and display the middle number. 

Ans:
          CLS 
          INPUT  "Enter any three number"; A,B,C
          IF A > B AND A < C OR  A< B AND A > C THEN 
          PRINT  "The middle number is"; A
          ELSE IF B > A  AND B < C OR B < A  AND B > C THEN 
          PRINT  "The middle number is"; B
          ELSE 
          PRINT  "The middle number"; C
          END IF 
          END 


6. WAP to test weather a user input number is completely divisible by 13 or not. 

Ans:
           CLS 
           INPUT  "Enter any number";N 
           IF  N  MOD  13 = 0  THEN 
           PRINT  "The number is divisible by 13" 
           ELSE 
           PRINT  "The number is not divisible by 13" 
           END IF 
           END 


7. WAP to define a function procedure which return whether a input number is positive, negative, zero. 

Ans:
          CLS 
          INPUT "Enter any number";N 
          IF  N > 0  THEN 
          PRINT  "The number is positive" 
          ELSE IF  N < 0  THEN 
          PRINT "The number is negative" 
          ELSE 
          PRINT "The number is zero" 
          END IF 
          END 


8. WAP to input a year and display whether the year is leap year or not. 

Ans:
          CLS 
          INPUT  "Enter your year";Y 
          IF  Y  MOD  4 = 0  AND  Y  MOD  100 < > 0  OR  Y  MOD  400 = 0  THEN 
          PRINT  "The year is a leap year" 
          ELSE 
          PRINT "The year is not a leap year" 
          END IF 
          END 


9. Input the age of a person and find out whether the person is eligible to drive or not. 

Ans:
          CLS 
          INPUT  "Enter your age";A 
          IF  A > 16  THEN 
          PRINT  "You are eligible to vote" 
          ELSE 
          PRINT  "You are not eligible to vote" 
          END IF 
          END 


10. WAP to enter any three numbers and display the greatest one.

Ans:
          CLS 
          INPUT  "Enter any three number"; A,B,C
          IS A > B AND A > C THEN 
          PRINT  "The greatest number is";A 
          ELSE  IF B > A AND B > C
          PRINT  "The greatest number is";B 
          ELSE 
          PRINT  "The greatest number is ";C
          END IF 
          END

Comments

Post a Comment

Popular posts from this blog

Father's day

Father's Day  is a celebration honoring fathers and celebrating fatherhood, paternal bonds, and the influence of fathers in society.  The officially recognized date of Father's Day varies from country to country.  In Nepal, it is usually celebrated in between 30th August to 30th September.  The Newar population (natives of Kathmandu valley) in Nepal honors fathers on the day of Gokarna Ausi , which occurs in late August or early September, depending on the year, since it depends on the lunar calendar. The Western-inspired celebration of Father's Day that was imported into the country is always celebrated on the same day as Gokarna Ausi.  On the new moon day, i t is traditional to pay respect to one's deceased father; Hindus go to the Shiva  temple of Gokarneswor Mahadev, in Gokarna, a  suburb of Kathmandu  while Buddhists go to Jan Bahal  (Seto Machhendranath or white Tara) temple in Kathmandu. Traditionally, in the Kathmandu Valley,  the south-western corner is rese
Read more

Journey to jm

Journey with Jagat Mandir The journey with JM was like a ride in the roller coaster.I had both the good as well as bad moment in this journey.I was first admitted at nursery grade which began my journey with JM. I was very young when I was brought in this school and I have seen many reforms during this time period. I had seen changes in the teaching learning of my school which has made my studies improve. JM has not only focused on the students academics but also in the sports. They have given their best to provide best facility to their students for their better result. Our school is not only based on theoretical  but also in practical which has been a great way to study and learn new things.The teachers are very friendly towards all the students. JM has build up my confidence to perform and face mass audience during the stage performance.  This journey has become very memorable because of the field trips that we went through that created lots and lots of memories of me a
Read more

My Father

Image
MY FATHER A father is someone whom you look up to no matter how tall you grow. My father's name is Bal Krishna Chakradhar. He is 45 years old. He is very caring, kind and helpful to all the people. He is a businessman. His hobby is planting vegetable, fruits and flowers and also he loves cooking food. He is very good at cooking and I love eating what he cooks. He loves to hangout with his family and his friend. He takes us to picnics and trips during our weekends and vacations. My father is a very creative person and this fact inspires me a lot. He always encourages me to give my best at everything. I and my father share every good and bad things we come across in our daily routine. He always supports me as well as my family. He tries to gives us the best facilities so that we can live happily and have healthy life. He has created a strong bond with every person he meets and he always makes sure to keep his family happy and blessed by his efforts and positive attit
Read more