网友您好, 请在下方输入框内输入要搜索的题目:

题目内容 (请给出正确答案)

(11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Private Sub Command1_Click() Max=0 Mix=10 For i=1 To 20 n=Val(InputBox("请输入分数")) If n>Max Then Max=n If n>Mix Then Mix=n s=s+n s=s-Mix-Max P=s/18 Print"最高分";Max;"最低分";Mix Print"最后得分:";p End Sub


参考答案

更多 “ (11)下列是一个体操评分程序。设满分为10分,20位评委,除去一个最高分和一个最低分,计算平均分。 Private Sub Command1_Click() Max=0 Mix=10 For i=1 To 20 n=Val(InputBox("请输入分数")) If nMax Then Max=n If nMix Then Mix=n s=s+n s=s-Mix-Max P=s/18 Print"最高分";Max;"最低分";Mix Print"最后得分:";p End Sub ” 相关考题
考题 以下是一个竞赛评分程序。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+xNext is= 【 】p=s/6MsgBox"最后得分:"PEnd Sub

考题 假设每个歌手的 “ 最后得分 ” 的 计 算方法是 : 去掉一个最高分 和一 个最低分,取剩下分数的平均分 。根据 “ 评分 ” 表求每个歌手的 “ 最后得分 ” 并存储于 表 TEM P 中 。 表 TEM P 中有两个字段 : “ 歌手号 ” 和 “ 最后得分 ” ,并且按最后得分降序排列,生成表 TEMP 的 SQL 语句是 :A)SELECT 歌手号 ,( COUNT ( 分数 ) - MAX( 分数 )-MIN( 分数 ))/(SUM(*)-2) 最后得分 ;FROM 评分 INTO DBF TEMP GROUP BY 歌手号 ORDER BY 最后得分 DESCB)SELECT 歌手号 ,( COUNT ( 分数 )-MAX( 分数 )-MIN( 分数 ))/(SUM(*)-2) 最后得分 ;FROM 评分 INTO DBF TEMP GROUP BY 评委号 ORDER BY 最后得分 DESCC)SELECT 歌手号 ,( SUM ( 分数 ) -MAX( 分数 )-MIN( 分数 ))/(COUNT(*)-2) 最后得分 ;FROM 评分 INTO DBF TEMP GROUP BY 评委号 ORDER BY 最后得分 DESCD)SELECT 歌手号 ,(SUM( 分数 )-MAX( 分数 )-MIN( 分数 ))/(COUNT(*)-2) 最后得分 ;FROM 评分 INTO DBF TEMP GROUP BY 歌手号 ORDER BY 最后得分 DESC

考题 以下是一个比赛的评分系统,假设有8名评委,评分标准是去掉一个最高分和一个最低分,剩余分数的平均分即为选手的得分。试将程序补充完整。Private sub Form_Click( )Dim max as integer,min as integer,i as integer,num as integer,sum as integer,avg as singlemax=0min=10For i=1 to 8num=val(inputbox("请输入分数" )if 【 】 then max=humif 【 】 then min=numsum=sum+numNext isum=【 】avg=sum/6Msgbox "最后得分:" avgEnd sub

考题 奥运赛场上,七位裁判员给一名跳水运动员评分后,去掉一个最高分和一个最低分,平均得9.42分;只去掉一个最高分,平均得9.35分;只去掉一个最低分,平均得9.5分。这个运动员的最高分与最低分相差多少分?( )A.0.6B.0.7C.0.8D.0.9

考题 以下是一个竞赛评分程序。8位评委,去掉一个最高分和一个最低分,计算平均分(设满分为10分)。请填空补充完整。Private Sub Form_Click()Dim Max As Integer,Min As IntegerDim 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+xNext is=【 】p=s/6MsgBox"最后得分:"pEnd Sub

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

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

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

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