Console.WriteLine("Type in the first temperature")
temp(0) = Console.Readline()
Console.Writeline("Write down the second number")
temp(1) = Console.ReadLine()
Console.WriteLine("Now write the last temperature")
temp(2) = Console.ReadLine()
Dim max As Decimal = -1000000
Dim min As Decimal = 10000000
for i As Integer = 0 To temp.Length - 1
Console.WriteLine("the highest temperature was " & max)
Console.WriteLine("The lowest temperature was " & min)
Console.Writeline("The difference between these two numbers is " & dif)