![](https://lstatic.shangxueba.com/jiandati/h5/images/m_q_title.png)
以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算平均分。请将程序补充完整。
Dim max As Integer,min As Integer
Dim i As Integer,x As Integer,s As Integer
max=0:min=10
For i=1 To 8
x=Val(InputBox("请输入得分(0~10):"))
If______Then max=x
If x<min Then min=x
s=s+x
Next i
s=______
MsgBox"最后得分:"&s
分规则为:在每个选手的m个得分中,去掉一个最高分和一个最低分后,取平均分作为该选于的最后得分。要求编程实现:
(1)根据n个选手的最后得分,从高到低输出选手的得分名次表,以确定奖名单
(2)根据各选手的最后得分与各评委给该选手所评分数的差距,对每个评委评分的准确性和评分水准给出一个定量的评价,从高到低输出各评委得分的名次表。
某歌唱比赛分2阶段:乐理知识竞赛和演唱比赛。每阶段的比赛,评委人数可能不同,要计算出每个阶段选手的平均得分、最高分、最低分。 其中, 乐理知识平均分=乐理知识评委的总分数 / 评委的人数 演唱平均分=演唱评委的总分数 / 评委的人数 请编写歌唱比赛的评分程序。 1、编写float statistic(int num)函数,其中num是人数,函数的功能是: 输入每位评委的分数,求平均分、最高分、最低分,返回值为平均分。 2、编写main()函数,完成如下功能: 输入乐理评委的人数,调用statistic函数,求乐理知识的平均分、最高分、最低分,并输出。 输入演唱评委的人数,调用statistic函数,求演唱的平均分、最高分、最低分,并输出。 输入、输出样例:提示: statistic函数只能用return语句返回一个值(平均分),最高分、最低分无法直接return,可以设计2个全局变量,用于保存每次调用求出的最高分、最低分。 (可参阅讨论题“全局变量的作用”中area1、area2、area3的作用) 允许不同的编程方法。
某城市举办歌曲大赛,由7位评委给参赛选手打分(设满分为10分)。每位选手最后得分的计算方法是:去掉一个最高分和一个最低分,其余5位评委打分的平均值为选手的得分。请编写计算单个参赛选手得分的程序。
为了保护您的账号安全,请在“简答题”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!