itgle.com

以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算下均分(设满分为10分),请填空补充完整。Private Sub Form_Click()Dim Max as Integer,Min as IntegerDial i as Integer,x as Integer,s as IntegerDim p as SingleMax=0Min=10For i=1 To 8x=Val (InputBox("请输入分数:"))If 【 】 Then Max=xIf 【 】 Then Min=xs=s

题目

以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算下均分(设满分为10分),

请填空补充完整。

Private Sub Form_Click()

Dim Max as Integer,Min as Integer

Dial i as Integer,x as Integer,s as Integer

Dim p as Single

Max=0

Min=10

For i=1 To 8

x=Val (InputBox("请输入分数:"))

If 【 】 Then Max=x

If 【 】 Then Min=x

s=s+x

Next i

s= 【 】

p=s/6

MsgBox"最后得分:"&P

End Sub


相似考题
更多“以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算下均分(设满分为10分), 请填空 ”相关问题
  • 第1题:

    有七位考官对一位应聘者评分,如果去掉一个最高分和一个最低分,则平均分为7分;如果只去掉一个最高分,则平均分为6.75分;如果只去掉一个最低分,则平均分为7.25分。那么,这位应聘者所得的7个分数中,最高分与最低分的差值为( )分。

    A1.5
    B2
    C3
    D3.5


    答案:C
    解析:

  • 第2题:

    “去掉一个最高分,去掉一个最低分,再求平均得分”的操作,是为了减小误差。 ()


    =(sum(5个分数)-max(5个分数)-min(5个分数))/3

  • 第3题:

    歌唱大赛选手成绩计算:歌唱大赛选手成绩计算方法如下:去掉一个最高分,去掉一个最低分,将剩下分数的平均值作为选手的最后成绩。这里假设共有10位评委,都是按照百分制打分,用数组来存放10个评委的分数。


    节奏较简单;内容与文字具有童趣并易于记忆和理解;歌词内容应富于爱、富于没、富于想象、富于教益;歌词形式与内容应适于用动作来表现

  • 第4题:

    选做题:编写一个竞赛评分程序。(设4位选手,5位评委)评分标准:去掉一个最高分,去掉一个最低分,求出选手的平均分。(使用随机函数产生选手成绩,随机函数的使用程序样例见附件)。


    选择赛制;编排比赛轮次;抽签进入自己的位置号;编排竞赛日程;编印秩序册

  • 第5题:

    1、某项体育赛事会邀请N位评委(最多十位),每位评委会给出1-9之间的一个整数作为评分值。评分统计程序要去掉一个最高分,去掉一个最低分,然后计算平均值并显示,输出显示时保留两位小数。