Write a program in Qbasic to find the product of two numbers where the first number is 6 and second number is 8
Answers
1. Enter any two numbers and display its sum.
REM PROGRAM TO DISPLAY SUM OF TWO NUMBERS
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
S = A + B
PRINT “SUM OF TWO NUMBERS”; S
END
USING SUB PROCEDURE
DECLARE SUB SUM (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
CALL SUM(A, B)
END
SUB SUM (A, B)
S = A + B
PRINT “SUM OF TWO NUMBERS”; S
END SUB
USING FUNCTION PROCEDURE
DECLARE FUNCTION SUM (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
S = SUM(A, B)
PRINT “SUM OF TWO NUMBERS”; S
END
FUNCTION SUM (A, B)
SU = A + B
SUM = SU
END FUNCTION
2. Enter any two numbers and display its difference.
REM PROGRAM TO DISPLAY DIFFERENCE OF TWO NUMBERS
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
D = A - B
PRINT “DIFFERENCE OF TWO NUMBERS”; D
END
USING SUB PROCEDURE
DECLARE SUB DIFF (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
CALL DIFF(A, B)
END
SUB DIFF (A, B)
D = A - B
PRINT “DIFFERENCE OF TWO NUMBERS”; D
END SUB
USING FUNCTION PROCEDURE
DECLARE FUNCTION DIFF (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
DI = DIFF(A, B)
PRINT “DIFFERENCE OF TWO NUMBERS”; DI
END
FUNCTION DIFF (A, B)
D = A - B
DIFF = D
END FUNCTION
3. Enter any two numbers and display its product.
REM PROGRAM TO DISPLAY PRODUCT OF TWO NUMBERS
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
P = A * B
PRINT “PRODUCT OF TWO NUMBERS”; P
END
USING SUB PROCEDURE
DECLARE SUB PROD (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
CALL PROD(A, B)
END
SUB PROD (A, B)
P = A * B
PRINT “PRODUCT OF TWO NUMBERS”; P
END SUB
USING FUNCTION PROCEDURE
DECLARE FUNCTION PROD (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
PR = PROD(A, B)
PRINT “PRODUCT OF TWO NUMBERS”; PR
END
FUNCTION PROD (A, B)
P = A * B
PROD = P
END FUNCTION
4. Enter any two numbers and display its average.
REM PROGRAM TO DISPLAY AVERAGE OF TWO NUMBERS
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
AV = (A + B) / 2
PRINT “AVERAGE OF TWO NUMBERS”; AV
END
USING SUB PROCEDURE
DECLARE SUB AVERAGE (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
CALL AVERAGE(A, B)
END
SUB AVERAGE (A, B)
AV = (A + B) / 2
PRINT “AVERAGE OF TWO NUMBERS”; AV
END SUB
USING FUNCTION PROCEDURE
DECLARE FUNCTION AVERAGE (A, B)
CLS
INPUT “ENTER FIRST NUMBER”; A
INPUT “ENTER SECOND NUMBER”; B
AVGR = AVERAGE(A, B)
PRINT “AVERAGE OF TWO NUMBERS”; AVGR
END
FUNCTION AVERAGE (A, B)
AV = (A + B) / 2
AVERAGE = AV
END FUNCTION