已知数组a中存储了某次考试某一指定科目的相关数据,数组a各元素的含义如表所示:
数组元素
数组元素的含义
a(1)
存储班级数n
a(2)
从a(2)到a(n+1)依次存储1、2、…、n班学生的人数
…
a(n+1)
a(n+2)
从a(n+2)开始依次存储1班每个学生的单科成绩,2班每个学生的单科成绩、……、n班每个学生的单科成绩
…
…
张老师依据数组a中的相关数据编写了VB程序来统计各班平均分。
程序功能如下:在文本框Text1中输入科目名称,单击“读取数据库”按钮Command1程序从数据库读取数据;单击“开始统计”按钮Command2程序进行统计处理,结果输出在列表框List1中。程序运行界面如图所示。
(1)
根据程序运行界面中的数据及数组a各元素的含义,数组元素a(5)的值为(填写数值)。
(2)
请在划线处填入合适的代码。
Dim a (1 To 600) As Integer数组大小满足处理要求 Private Sub
Command1_Click ( )
‘本过程从数据库读取指定科目的各相关数据,存储在数组a中
‘本过程语句略
End Sub
Private Sub Command2_Click (
)
‘依据数组a中的相关数据统计各班级平均分
Dim i As Integer, j As Integer, n As Integer
Dim p As Integer, sum As Integer, aver As
Single
①
p=n+2
For i =1 To n
sum= 0
For j=1 To a (i+1)
②
p=p+1
Next j
aver= sum/a (i
+1)
List1 AddItem
Str(i)+ “” n+ str(a(i+1)) + “” + Str(aver)
Next i
End Sub
① ②
答案: 【1】33
【1】n=a(1)【2】sum=sum+a(p)