栏目分类:
子分类:
返回
名师互学网用户登录
快速导航关闭
当前搜索
当前分类
子分类
实用工具
热门搜索
名师互学网 > IT > 面试经验

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

面试经验 更新时间: 发布时间: IT归档 最新发布 模块sitemap 名妆网 法律咨询 聚返吧 英语巴士网 伯小乐 网商动力

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

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

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

要求:在程序中的横线处填写正确的内容,使其实现上述功能,但不能修改程序的其他部分,最后把修改后的文件按原文件名存盘。
[题目提供的源程序]
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为需要累加的值。总数除以量的个数即可得到平均值。
转载请注明:文章转载自 www.mshxw.com
本文地址:https://www.mshxw.com/it/258329.html
我们一直用心在做
关于我们 文章归档 网站地图 联系我们

版权所有 (c)2021-2022 MSHXW.COM

ICP备案号:晋ICP备2021003244-6号