2. 计算机
  3. 下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。 Private Sub Commandl_Click() Max=0 Min=10 For i=1 To 20

下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。 Private Sub Commandl_Click() Max=0 Min=10 For i=1 To 20

admin2010-09-11  36
问题 下列是一个体操评分程序。设满分为10分，20位评委，除去一个最高分和一个最低分，计算平均分。
   Private Sub Commandl_Click()
      Max=0
      Min=10
      For i=1 To 20
         n=Val(InputBox("请输入分数"))
         If n＞Max Then Max=n
         If n＜Min Then Min=n
         s=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，循环体结束。
转载请注明原文地址:https://kaotiyun.com/show/hjmp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)