QBasic Programming:

To Find Volume of Cylinder

CLS

INPUT "Enter radius"; r

INPUT "Enter height"; h

V = 22 / 7 * r ^ 2 * h

PRINT "Volume of cylinder="; V

END

QBasic Programming:

To Find Volume of Cube

CLS

INPUT "Enter length"; l

V = l ^ 3

PRINT "Volume of cube="; V

END

QBasic Programming:

To Find Volume of Box

CLS

INPUT "Enter length"; l

INPUT "Enter breadth"; b

INPUT "Enter height"; h

V = l * b * h

PRINT "Volume of box="; V

END

QBasic Programming:

To Find Area of Four Walls

CLS

INPUT "Enter length"; l

INPUT "Enter breadth"; b

INPUT "Enter height"; h

A = 2 * h * (l + b)

PRINT "Area of four walls="; A

END

QBasic Programming:

To Find Area of Square

CLS

INPUT "Enter length"; l

A = l ^ 2

PRINT "Area of square="; A

END

QBasic Programming:

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

QBasic Programming:

To Find Area of Circle

CLS

INPUT "Enter radius"; r

A = 22 / 7 * r ^ 2

PRINT "Area of circle="; A

END