vb程序设计,把100-200之间的20个数存到一个数组里,求最大值最小值和平均值

来源：学生作业帮编辑：作业帮分类：综合作业时间：2024/05/16 05:05:06

Private Sub Command1_Click()
Dim a(1 To 20)
Dim max,ave,min,sum
max = 0
min = 300
Print "产生的20个数为:";
For i = 1 To 20
a(i) = Int(Rnd() * 100 + 101)
Print a(i);
sum = sum + a(i)
If a(i) > max Then max = a(i)
If a(i) < min Then min = a(i)
Next
Print
Print "平均值为"; sum / 20; "最大值为："; max; "最小值为："; min
End Su

vb程序设计,把100-200之间的20个数存到一个数组里,求最大值最小值和平均值用数组求10个数中的最大值、最小值和平均值. 用VB求最大值最小值和平均值问一个VB基础题啊怎么随机产生10个30到100的数,求最大值、最小值和平均值.输出结果编一VB程序,随机产生10个30~100(包括30,100)的正整数,求最大值,最小值和平均值,并显示整个数组的值和结果急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, 用C语言编写：求元素个数为 10 的一维数组元素中的最大值、最小值和平均值. 写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值编写用指针变量作为函数参数求数组的最小值、最大值和平均值的函数用数组求一组数中最大值,最小值和平均值,并求有多少个数超过平均值 VB,用VB语言写!随机产生10个两位整数,求期中的最大值,最小值和平均值. 用C语言求10个数的最大值和最小值和平均值