从没有数组的一系列数字中获得最少的值(VB.NET)

Question

是的，这是作业的一部分。这就是问题所在--我知道我可以使用数组，但是我们还没有达到这个类的那个部分，所以我还不应该使用它。用户输入五个数字(双倍，使用InputBoxes)，程序应该删除最低值，并计算其余四个的平均值。在这个关键时刻，我们一直在研究For...Next循环，这是书中相应的For...Next部分，所以我知道我应该在这里的某个地方加入一个循环，但是我还没有弄清楚如何计算，然后保持一个运行的“最低”变量。

谢谢你的帮助！

原件：

Sub getAverage()
    Dim first As Double = CDbl(InputBox("Enter the first grade.", "First"))
    Dim second As Double = CDbl(InputBox("Enter the second grade.", "Second"))
    Dim third As Double = CDbl(InputBox("Enter the third grade.", "Third"))
    Dim fourth As Double = CDbl(InputBox("Enter the fourth grade.", "Fourth"))
    Dim fifth As Double = CDbl(InputBox("Enter the fifth grade.", "Fifth"))
    Dim min As Double = 0
    Dim sum As Double = 0
    For count As Integer = 1 To 5

    Next
    Dim average As Double = 0
    txtOutput.Text = average.ToString("N2")

End Sub

编辑1(谢谢古法)：我应该比较目前的等级吗？

Sub getAverage()
    Dim min As Double = 0
    Dim sum As Double = 0
    For count As Integer = 1 To 5
        Dim grade As Double = InputBox("Enter Grade #" & count)
        sum += grade
        If grade < '??? Then
          min = grade
        End If
    Next
    Dim average As Double = 0
    txtOutput.Text = average.ToString("N2")

End Sub

Answer 1

没有五个输入语句，而是将一个输入语句放在循环中。

您需要跟踪：

- The sum of all values
- The lowest value that you encounter

只需在输入数字时将每个数字加到和中，如果输入的值低于以前的值，则更新最低值。

当用户输入所有数字时，您只需从所有值的总和中减去最低的数字，这就给出了相同的值，就好像您已经将所有数字加起来了，但最低的数字除外。

平均值只是除以数值数的总和。