Imports System
Public Module Module1
Public Sub Main()
Console.WriteLine("INGRESE T")
CONSOLE.Readline()
DIM T AS DOUBLE
DIM F, K AS DOUBLE
T=CONSOLE.Readline()
F=T*1.8+32
CONSOLE.Writeline("1...es", f)
END SUB
End Module