[问答题] 完成下列问题：在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。其功能是产生20个0～1000的随机数，放入一个数组中，然后输出这20个整数的平均值。程序运行

[问答题] 完成下列问题：在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。其功能是产生20个0～1000的随机数，放入一个数组中，然后输出这20个整数的平均值。程序运行

[问答题] 完成下列问题：

在考生文件夹下有一个工程文件sjt3.vbp，相应的窗体文件为sjt3.frm。其功能是产生20个0～1000的随机数，放入一个数组中，然后输出这20个整数的平均值。程序运行后，单击命令按钮(名称为Command1，标题为“输出平均值”)，即可求出其平均值，并在窗体上显示出来(如图3所示)。这个程序不完整，清把它补充完整，并能正确运行。

要求：在程序中的横线处填写正确的内容，使其实现上述功能，但不能修改程序的其他部分，最后把修改后的文件按原文件名存盘。

[题目提供的源程序]

Option base 1

Private Sub Command1_Click()

Dim arrN(20) As Integer

Dim Aver As Single

Dim Sum As Integer, i

Randomize

For i=1 To 20

arrN(i)=Int(Rnd* (1) )

Next i

Sum= (2)

For i=1 To 20

Sum= (3)

Next i

Aver= (4)

Print Aver

End Sub

正确答案：

[ *** 作步骤] 第1步：打开工程sjt3.vbp。 第2步：修改程序。 第3步：调试、运行并保存程序。 [1]1001 [2]0 [3]sum+arrN(i) [4]sum/20

参考解析：

产生一个a～b之间的随机整数的方法是：Int(Rnd*(b-a+1)+a)。累加求和时先设一个用于存储总和的变量，该变量的初始值为0，如sum=0，累加的方法为sum=sum+m，其中m为需要累加的值。总数除以量的个数即可得到平均值。