QBasic Programming

calculate selling price where loss percentage and cost price is given

REM PROGRAM TO CALCULATE SELLING PRICE WHERE LOSS PERCENTAGE AND COST PRICE IS GIVEN
CLS
INPUT “ENTER COST PRICE”; CP
INPUT “ENTER LOSS PERCENTAGE”; LP
SP = CP * (100 - LP) / 100
PRINT “SELLING PRICE=”; SP
END

USING SUB PROCEDURE

DECLARE SUB SELLINGP (CP, LP)
CLS
INPUT “ENTER COST PRICE”; CP
INPUT “ENTER LOSS PERCENTAGE”; LP
CALL SELLINGP(CP, LP)
END

SUB SELLINGP(CP, LP)
SP = CP * (100 - LP) / 100
PRINT “SELLING PRICE=”; SP
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION SELLINGP (CP, LP)
CLS
INPUT “ENTER COST PRICE”; CP
INPUT “ENTER LOSS PERCENTAGE”; LP
PRINT “SELLING PRICE=”; SELLINGP(CP, LP)
END

FUNCTION SELLINGP(CP, LP)
SP = CP * (100 - LP) / 100
SELLINGP = SP
END FUNCTION

calculate selling price where profit percentage and cost price is given (Prev Lesson)
(Next Lesson) calculate cost price where loss percentage and selling price is given
Back to QBasic Programming

No Comments

Post a Reply

Course Curriculum

error: Content is protected !!