QBASIC PROGRAM TO CONVERT TEMPERATURE IN CELSIUS TO FAHRENHEIT. FUNCTION

DECLARE FUNCTION CON(C)
CLS
INPUT "ENTER TEMPERATURE IN CELSIUS";C
PRINT "TEMPERATURE IN FAHRENHEIT ";CON(C)
END

FUNCTION CON(C)
CON =9*C/5+32
ENS FUNCTION