CONVERT TEMPERATURE IN CELSIUS IN FARENHEIT(FUN)

DECLARE FUNCTION FAH (C)
CLS
INPUT"ENTER CELSIUS";C
PRINT"CELSIUS TO FAHRENHEIT";FAH(C)
END

FUNCTION FAH(C)
F=9*C/5+32
FAH=F
END FUNCTION