Slacker
Slacking Guru
- Messages
- 316
- Location
- placetoplace
'Declarations
Dim decCelsius As Decimal = 0
Dim decFahrenheit As Decimal = 0
'Input Console Window
Console.Write("Please enter a Celsius Temperature.")
decCelsius = CDec(Console.ReadLine())
'Process Calculate Celsius
decFahrenheit = CDec(decCelsius * 1.8 + 32)
'Output to Console Window
Console.WriteLine()
Console.WriteLine("Fahrenheit Temperature " & decFahrenheit)
'Termination: Hold Program on Console Screen
Console.WriteLine()
Console.Write("Press the Enter key to terminate program.")
Console.Read()
Dim decCelsius As Decimal = 0
Dim decFahrenheit As Decimal = 0
'Input Console Window
Console.Write("Please enter a Celsius Temperature.")
decCelsius = CDec(Console.ReadLine())
'Process Calculate Celsius
decFahrenheit = CDec(decCelsius * 1.8 + 32)
'Output to Console Window
Console.WriteLine()
Console.WriteLine("Fahrenheit Temperature " & decFahrenheit)
'Termination: Hold Program on Console Screen
Console.WriteLine()
Console.Write("Press the Enter key to terminate program.")
Console.Read()