更多"以下是一个比赛的评分系统,假设有8名评委,评分标准是去掉一个最高分和一"的相关试题:
[填空题]以下是一个竞赛评分程序8位评委,去掉一个最高分和一个最低分,计算平均分(设满分为10分),请填空补充完整。
Private Sub Form_Click( )
Dim Max as Integer,Min as Integer
Dim i aS Integer, X as Integer,S as Integer
Dim p aS Single
Max=0
Min=10
For i=1 TO 8
x=Va1(1nputBox("请输入分数:"))
If 【13】 Then Max=x
If 【14】 Then Min=x
s=s+x
Next i
s= 【15】
p=s/6
MsgBox"最后得分:"& p
End Sub
[填空题]以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算平均分(设满分为10分)。请填空补充完整。
PrivateSubForm_Click( )
Dim Max as Integer,Min as Integer
Dim i as Integer,x as Integer,s as Integer
Dimp p as Single
Max=0
Min=10
Fori=1 To 8
x=Vid(1nputBox("请输入分数:"))
If______Ihen Max=x
If______ThhcnMin=x
s=s+x
Nexti
S=______
p=s/6
MsgBox"最后得分:"&p
EndSub
[单项选择]体操比赛有六位裁判评分,去掉一个最高分9.80后,剩下五个分数的平均分减少0.05分。去掉一个最低分9.42后,剩下四个数的平均分是多少
A. 9.50
B. 9.52
C. 9.54.
D. 9.60
[填空题]下列是一个体操评分程序。设满分为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
[填空题]下列是一个体操评分程序。设满分为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
[填空题]下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。
Private Sub Command1_Click( )
Max=0
Min=10
For i=1 To 20
n=Val(InputBox("请输入分数"))
If n>Max Then Max=n
If n s=s+n
______
s=s-Min-Max
p=s/18
Print"最高分";Max;"最低分";Min
Print"最后得分:";p
End Sub
[填空题]
下面是一个体操评分程序。20位评委,除去一个最高分和一个最低分,计算平均分(设满分为10分)。
Private Sub
Command1_Click( )
Max=0
Min=10
For I=1 To 20
N=Val(InputBox("请输入分数"))
If (12) Then Max=N
If N<Min Then
Min=N
S=S+N
Next I
S=
(13)
P=S/18
Print"最高分";Max"最低分";Min
Print"最后得分:";P
End
Sub
[填空题]下面是一个体操评分程序,20位评委,除去一个最高分和一个最低分,计算平均分(设满分为10分)。请在空白处填入适当的代码。
Max=0
Min=10
For i=1 To 20
n=Val(InputBox("请输入分数"))
If______Then Max=n
If______Then Min=n
s=s+n
Next i
s=______
p=s/18
Print"最高分:"; Max,"最低分:"; Min
Print"最后得分:"; p
[填空题]程序的功能是,在10个评委中,去除一个最高分和一个最低分,然后求平均分。
main( )
{
int a[10],i,max,min;
float s=0:
for(i=0;i<10;i++)
{
scanf("%d",&a[i]);
s=s+a[i];
}
max=min=a[0];
for(i=1;i<10;i++)
{
if(max
[多项选择]从键盘上输入10个评委的分数,去掉一个最高分,去掉一个最低分,求出其余8个人的平均分,输出平均分,最高分,最低分。
[填空题]设有十位评委给某位选手打分,以去掉一个最高分和一个最低分后的平均分作为该选手的成绩。试编写程序,要求从键盘输入评委的评分并存入到数组中,计算并输出选手成绩。
[填空题]以下是一个竞赛评分程序。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 【13】 Then Max=x
If 【14】 Then Min=x
s=s+x
Next i
s= 【15】
p=s/6
MsgBox"最后得分:"&P
End Sub
[简答题]Excel操作题
(1)计算每个学生的平均分,不保留小数。
(2)分别合并“最高分”与“最低分”所在的前两列单元。
(3)分别计算三门课程的最高分及平均分中的最高分。
(4)分别计算三门课程的最低分及平均分中的最低分。
(5)第一行标题跨列居中,标题用红色20磅楷体。
会计08-10班 学生成绩表 |
学号 | 姓名 | 会计学 | 统计学 | 财务管理 | 评均分 |
[单项选择]某次比赛规定选手成绩为五位评委去掉最高分与最低分后的平均成绩,已知某人的最终成绩为82,前四位评委打出的成绩依次为79、83、86、81,问第五位评委给了多少分 A. 75 B. 87 C. 82 D. 84
购买搜题卡查看答案
[会员特权] 开通VIP, 查看 全部题目答案
[会员特权] 享免全部广告特权
请选择支付方式
-
微信支付
-
支付宝支付
立即支付
系统将自动为您注册账号
请使用微信扫码支付
请不要关闭本页面,支付完成后请点击【支付完成】按钮
恭喜您,购买搜题卡成功
重要提示:请拍照或截图保存账号密码!
我要搜题网官网:https://www.woyaosouti.com
我已记住账号密码
|
|