2. 计算机
  3. 已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command1_Click() 　　Dim sum As Int

已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下： Option Base 1 Private Sub Command1_Click() 　　Dim sum As Int

admin2015-08-28  60
问题 已知在4行3列的全局数组score(4,3)中存放了4个学生3门课程的考试成绩(均为整数)。现需要计算每个学生的总分，某人编写程序如下：
Option Base 1
Private Sub Command1_Click()
　　Dim sum As Integer
　　sum＝0
　　For i＝1 To 4
　　　　For j＝1 To 3
　　　　　　sum＝sum＋score(i， j)
　　　　Next j
　　　　Print "第" & i & "个学生的总分是："； sum
　　Next i
End Sub
运行此程序时发现，除第1个人的总分计算正确外，其他人的总分都是错误的，程序需要修改。以下修改方案中正确的是(　　)。
选项 A、把外层循环语句For i＝1 To 4改为 For i＝1 To 3内层循环语句For j＝1 To 3 改为 For j＝1 To 4
B、把sum＝0 移到For i＝1 To 4 和 For j＝1 To 3 之间
C、把sum＝sum＋score(i， j)改为sum＝sum＋score(j， i)
D、把sum＝sum＋score(i， j)改为 sum＝score(i， j)
答案B
解析 程序变量sum的值在开始计算第2个学生的总成绩时，仍保留着第一个学生的总成绩，这样会把前面学生的总成绩计算进去，显然不对。因此，sum＝0这一句应该放在第1层For循环体的第一句，即For i＝1 to 4和for j＝1 to 3之间。
转载请注明原文地址:https://kaotiyun.com/show/viQp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

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