Imports Microsoft.VisualBasic
Public Sub CalcCelcius(degF as decimal)
degC = (degF - 32) * 9 / 5
Console.Writeline(degF & "°F is approximately " & degC & "°C.")
Console.Writeline("Temperature converter v1.0")
Console.Writeline("-------------------" & vbCrLf)
Console.Write("Please enter a temperature in degrees fahrenheit: ")
degf = Console.Readline()