以下是一个竞赛评分程序。8位评委，去掉一个最高分和一个最低分

问题填空题

以下是一个竞赛评分程序。8位评委，去掉一个最高分和一个最低分，计算平均分（设满分为10分）。请填空补充完整。Private Sub Form_Click()Dim Max As Integer, Min As IntegerDim i As Integer, x As Integer, s As IntegerDim p As SingleMax = 0Min = 10 For i = 1 To 8x = Val(InputBox("请输入分数：")) If _________Then Max = xIf_________Then Min = x s = s + x Next i s = _________p = s / 6 MsgBox "最后得分：" & pEnd Sub

答案

参考答案：x>Max ， x

解析：本题中先给最大值变量赋值为 0，最小值变量赋值为 10。然后把输入的分数 x 与最大值和最小值比较，如果 x 比最大值大，则把 x 赋值给 Max，故第一空填 x>Max；如果 x 比最小值小，则把 x 赋值给 Min，故第二空填 x