Qbasic program for class 7

Class 7 QBASIC

 Qbasic: 

It is a high-level programming language. It is the most popular programming languages in the BASIC family. BASIC stands for Beginners All-Purpose Symbolic Instruction Code. The BASIC programming language was developed by Professors John George Kemeny and Thomaes at the Dartmouth College, USA in 1964 AD. The BASIC languages have different versions: GWBASIC, TURBO QBASIC, BASICA, visual BASIC, and QBASIC.

QBASIC was developed by Microsoft Corporation, the USA in 1985. It is a high-level programming language. The high-level programming languages are similar to the English language. So it is easy to write programs using a high-level language. QBASIC is very simple and easy to understand. So,  this language is most popular for beginners such as school students. Once you learn QBASIC programming, it will be helpful to learn other high-level programming languages such as c, c++, Java, PHP etc.

Worked  Out  Examples:

1.A program to calculate an area of a triangle where the length of three sides is given.

CLS

INPUT "ENTER FIRST, SECOND, THIRD SIDE";A,B,C

S=(A+B+C)/2

AREA= (S*(S-A)*(S-B)*(S-C))^(1/2)

PRINT "AREA OF TRIANGLE"; AREA

END

2. WAP TO INPUT TWO DIFFERENT NUMBERS AND CALCULATE THEIR SUM AND PRODUCT.

CLS

INPUT"ENTER FIRST AND SECOND NUMBER"; A, B

SUM= A+B

PRODUCT= A*B

PRINT "SUM OF TWO NUMBERS"; SUM

PRINT"PRODUCT OF TWO NUMBER": PRODUCT

END

3. PROGRAM TO ENTER AND PRINT NAME, CASS,  ROLL NUMBER, AND SCHOOL NAME.
CLS
INPUT "NAME";N$
INPUT "CLASS";C$
INPUT "ROLL NO";R
INPUT "SCHOOL NAME";SN$
PRINT "NAME";N$
PRINT "CLASS";C$
PRINT "ROLL  NUMBER";R
PRINT "SCHOOL NAME";SN$
END

4 WAP  TO CALCULATE THE AREA  OF RECTANGLE.

CLS
INPUT "ENTER LENGTH"; L
INPUT "ENTER BREADTH"; B
A= L*B
PRINT "AREA OF RECTANGLE"; A
END

5.WRITE A PROGRAM TO CHANGE THE TEMPERATURE FROM FAHRENHEIT TO CELCIUS
CLS
INPUT "ENTER THE TEMPERATURE IN  FAHRENHEIT"; F
C= (F-32) * 5/9
PRINT "TEMPERATURE IN CELSIUS"; C
END

6. WAP TO CALCULATE SIMPLE INTEREST
CLS
INPUT "ENTER PRINCIPAL, TIME, RATE"; P, T, R
I= (P*T*R) /100
PRINT "SI"; I
END

7. WAP TO CALCULATE CIRCUMFERENCE OF CIRCLE.
CLS
INPUT "ENTER RADIUS"; R
PI= 22/7
C= S*PI*R
PRINT  "CIRCUMFERENCE IS"; C
END

8. WAP TO INPUT CP AND SP AND FIND THE PROFIT.
CLS
INPUT "ENTER CP AND SP"; CP, SP
PROFIT= CP-SP
PRINT "PROFIT IS"; PROFIT
END

9. WAP TO CALCULATE AND PRINT AREA OF FOUR WALS
CLS
INPUT "ENTER LENGTH, BREADTH, AND HEIGHT"; L, B, H
AREA = 2*H*(L+B)
PRINT "AREA OF FOUR WALLS"; AREA
END

10. WAP TO INPUT NEPALI CURRENCY AND CHANGE INTO INDIAN CURRENCY
CLS
INPUT "NEPALI CURRENCY"; NC
IC= NC/.6
PRINT "INDIAN CURRENCY "; IC
END

INDIAN TO NEPALI
CLS
INPUT "INDIAN CURRENCY"; IC
NC= 1C*1.6
PRINT "NEPALI   CURRENCY"; NC
END

THANKS, IF QUESTION THEN COMMENT BELOW