niusouti.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之间的一个整数作为评分值。评分统计程序要去掉一个最高分，去掉一个最低分，然后计算平均值并显示，输出显示时保留两位小数。
错