填空题

测试用例包括输入值集和【1】值集。

【参考答案】

输出

<上一题目录下一题>

热门试题

单项选择题

已知在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=sam+score(i，改为sum=sum+score(j,i）
D．把sum=sum+score(i，改为sam=score(i,j)

单项选择题

某人编写了下列程序，用来求10个整数(整数从键盘输入)中的最大值： Private Sub Command1_Click() Dim a(10) As Integer, max As Integer For k=1 To 10 a(k)=InputBox( 输入一个整数 ) Next k max=0 For k=1 To 10 If a(k)＞max Then max=a(k) End If Next k Print max End Sub 运行程序时发现，当输入10个正数时，可以得到正确结果，但输入10个负数时结果是错误的。程序需要修改。下列修改中可以得到正确运行结果的是( )。

A．把If a(k)>max Then 改为 If a(k)＜max Then
B．把max=a(k)改为a(k)=max
C．把第2个循环语句For k=1 To 10改为For k=2 To 10
D．把max=0改为max=a(10)

测试用例包括输入值集和 【1】 值集。

测试用例包括输入值集和【1】值集。