Imports System

Public Module Module1

    Public Sub Main()

        Console.WriteLine("farenheit to celcius")

        Dim t as integer

        Dim c as integer

        t = console.readline

        c = (t - 32) * (5/9)

        console.WriteLine(c)

    End Sub

End Module