2. 计算机
  3. 以下是一个竞赛评分程序。其功能是去掉8位评委中的一个最高分和一个最低分，计算平均分。 Dim max As Integer，min As Integer Dim I As Integer．x As Integer，S As Integer max＝0：mi

以下是一个竞赛评分程序。其功能是去掉8位评委中的一个最高分和一个最低分，计算平均分。 Dim max As Integer，min As Integer Dim I As Integer．x As Integer，S As Integer max＝0：mi

admin2021-04-07  53
问题 以下是一个竞赛评分程序。其功能是去掉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 x＜min Tben ，min＝x
s＝s＋x
Next i
【    】
MsgBox”最后得分：”＆s
有如下语句：
max＝x
②If x＞max Then max＝x
③If max＞x Then max＝x
④s＝(s－max－min)／6
⑤s＝(max－min)／6
⑥s＝s／6
程序中有两个【    】，将程序补充完整的正确语句是(    )。
选项 A、①⑤
B、②④
C、③⑥
D、②⑥
答案B
解析 根据题意，代码功能是输入8个数，去掉一个最小值和一个最大值，求出剩余6个数的平均值。可以用For循环语句实现输入8个数，并将当前最小值赋给min，当前所有数的和赋给s，因此第一个【】中的代码应该实现将当前最大值赋给max，即如果当前x大于max，则max＝x，其中②If x＞max Then max＝x实现了此功能。For循环结束后，输出s的值，故第二个【】中的代码应该实现为s赋予剩余6个数的平均值。当前s的值为8个数的和，求剩余6个数的平均值应该先减去min和max在除以6，即④s＝(s－max－min)／6。故选择B选项。
转载请注明原文地址:https://www.kaotiyun.com/show/y3Sp777K
本试题收录于： 二级Access题库NCRE全国计算机二级分类
0

二级Access

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)