vb程序设计——用数据保存随机产生的10个介于20~50之间的整数,求最大数,最小数和平均数

来源：学生作业帮编辑：百度作业网作业帮分类：综合作业时间：2024/04/28 01:24:28

vb程序设计——用数据保存随机产生的10个介于20~50之间的整数,求最大数,最小数和平均数
然后将10个随机数和最大数,最小数以及平均数显示在窗体上

Sub form_click()
Dim i(10)
For n = 1 To 10
i(n) = Int(Rnd * 30 + 20)
Next
maxnum = 20
For n = 1 To 10
If i(n) > maxnum Then maxnum = i(n)
Next
minnum = 50
For n = 1 To 10
If i(n) < maxnum Then minnum = i(n)
Next
sumnum = 0
For n = 1 To 10
sumnum = sumnum + i(n)
Next
Cls
Print maxnum
Print minnum
Print sumnum / 10
End Sub
再问：怎么结果只有三个数，不是应该有十三个吗？
再答：在cls后面加 For n = 1 To 10 print i(n) next

vb程序设计——用数据保存随机产生的10个介于20~50之间的整数,求最大数,最小数和平均数求一VB代码,用数组保存随机产生的10个介于20到50之间的整数,编程求出其中的最大数、最小数和平均值,并 VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均 vb编程题.随机产生10个【50,300】之间的整数,求最大的偶数和最小的奇数. vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数. VB:随机产生 10 个整数,求其中最小的数.若随机产生n个整数又如何实现 vb编程：随机产生10个[10,100]的整数,求该组数的最大元素、最小元素及其位置. Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出求VB 程序设计利用随机函数产生80个10～99之间的随机整数,将其中的偶数按由小到大的顺序排列并输出,将奇 VB程序设计题——随机产生20个大于0小于100的整数,并分别计算出所有奇数和所有偶数的和. vfp改错题求解1下列程序用来产生20个0~100之间的随机整数,* 并找出其中的最大数和最小数,输出时20个随机* 整 vb 随机产生10个100-200之间的数求最大值