Imports System

Public Module Module1

    Public Sub Main()

        Dim celsius as decimal

        Dim farenheit as decimal

        'celsius=console.ReadLine()

        farenheit=console.ReadLine()

        console.WriteLine(celsius= (farenheit-32) * 5/9)

​

    End Sub

End Module