问题
填空题
下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Private Sub Commandl_Click() Max=0 Min=10 For i=1 To 20n=Val(InputBox("请输入分数"))If n>Max Then Max=nIf n<Min Then Min=ns=s+n _______ s=s-Min-Max p=s/18 Print "最高分";Max;"最低分";Min Print "最后得分:";p End Sub
答案
参考答案:Next i
解析: 本题在For循环中接收用户输入20个数,并把最大的数赋给Max,最小的数赋给Min。程序中有For循环“头语句”,而没有“结束语句”,因此空白处应填入Next i,循环体结束。