Pages

Search This Blog

Fahrenheit to Centrigrade



Module centi_fahren
    Sub main()
        Dim c, f As Integer
        Console.Write("Enter temp in Fahrenhite=")
        f = CInt(Console.ReadLine())
        c = (f - 32) * 5 \ 9
        Console.WriteLine("Temperature in centigrade=" + c.ToString())
        Console.ReadLine()
        Console.ReadLine()
    End Sub

End Module

1 comment: