6.求最大 小值

Dim a, b, c, min As Integer

Console.Write("a=") : a = Console.ReadLine

Console.Write("b=") : b = Console.ReadLine

Console.Write("c=") : c = Console.ReadLine

If a < b Then

If a < c Then

min = a

Else

min = c

End If

Else

If b < c Then

min = b

Else

min = c

End If

End If

Console.Write("巢狀IF所得的最小者：")

Console.WriteLine(min) : Console.ReadKey()