QBASIC PROGRAM TO CONVERT TEMPERATURE IN CELSIUS IN FARENHIT USING FUNCTION.
DECLARE FUNCTION CONVERT(C)
CLS
INPUT"ENTER CELSIUS";C
PRINT"TEMPERATURE IN FAHRENHEIT=";CONVERT(C)
END
FUNCTION CONVERT(C)
F=9*C/5+32
CONVERT=F
END FUNCTION
DECLARE FUNCTION CONVERT(C)
CLS
INPUT"ENTER CELSIUS";C
PRINT"TEMPERATURE IN FAHRENHEIT=";CONVERT(C)
END
FUNCTION CONVERT(C)
F=9*C/5+32
CONVERT=F
END FUNCTION
Comments
Post a Comment