Imports System

Public Module Module1

    Public Sub Main()

        Dhttps://dotnetfiddle.net/Aet7cwim n1 as integer

        Do until 

            (n1 = -1)

            n1 = console.ReadLine()

            Console.WriteLine((n1-32)*5/8 & "˚C")

        loop

    End Sub

End Module