QBasic Programming

to accept temperature in Fahrenheit from user and convert into the Celsius

REM PROGRAM TO CONVERT TEMPERATURE IN FARENHEIT TO CELCIUS
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
C = (F – 32) * (5 / 9)
PRINT “TEMPERATURE IN CELCIUS=”; C
END

USING SUB PROCEDURE

DECLARE SUB CONVERT (F)
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
CALL CONVERT (F)
END

SUB CONVERT (F)
C = (F – 32) * (5 / 9)
PRINT “TEMPERATURE IN CELCIUS=”; C
END SUB

USING FUNCTION PROCEDURE

DECLARE FUNCTION CONVERT (F)
CLS
INPUT “ENTER TEMPERATURE IN FARENHEIT”; F
PRINT “TEMPERATURE IN CELCIUS=”; CONVERT (F)
END

FUNCTION  CONVERT (F)
C = (F – 32) * (5 / 9)
CONVERT = C
END FUNCTION

Input selling price and cost price calculate profit or loss percentage (Prev Lesson)
(Next Lesson) to accept temperature in Celcius from user and convert into the Farenheit
Back to QBasic Programming

No Comments

Post a Reply

Course Curriculum

error: Content is protected !!