(11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Pr

15 查阅

（11）下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。 Private Sub Command1_Click() Max=0 Mix=10 For i=1 To 20 n=Val(InputBox("请输入分数")) If n>Max Then Max=n If n>Mix Then Mix=n s=s+n s=s-Mix-Max P=s/18 Print"最高分";Max;"最低分";Mix Print"最后得分：";p End Sub

参考答案:

Next i【解析】本题在For循环中接收用户输入20个数，并把最大的数赋给Max，最小的数赋给Min。程序中有For循环“头语句”，而没有“结束语句”，因此空白处应填入Next i，循环体结束。

计算机二级