万能百科  > 计算机   > 

[问答题] 完成下列问题:在考生文件夹下有一个工程文件sjt3.vbp,相应的窗体文件为sjt3.frm。其功能是产生20个0~1000的随机数,放入一个数组中

2021-07-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为需要累加的值。总数除以量的个数即可得到平均值。

词条内容仅供参考,如果您需要解决具体问题
(尤其在法律、医学等领域),建议您咨询相关领域专业人士。

标签