VB,先产生100个0~67之间的随机数,编一子过程计算这些随机数的平均值、最大值、最小值.
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:数学作业 时间:2024/07/29 02:35:13
VB,先产生100个0~67之间的随机数,编一子过程计算这些随机数的平均值、最大值、最小值.
Dim sum,max,min
Sub aaa(ByRef sum,ByRef max,ByRef min)
min = 100 ' 给最小值先给一个比较大的值
For i = 1 To 100
s = Int(Rnd(1) * (67 - 0)) + 0 's为算出0-67之间的随机数
sum = sum + s
If s > max Then max = s
If s < min Then min = s
Next i
sum = sum / 100
End Sub
Private Sub Command1_Click()
Call aaa(sum,max,min)
Print sum
Print max
Print "aaa"
Print min
End Su
Sub aaa(ByRef sum,ByRef max,ByRef min)
min = 100 ' 给最小值先给一个比较大的值
For i = 1 To 100
s = Int(Rnd(1) * (67 - 0)) + 0 's为算出0-67之间的随机数
sum = sum + s
If s > max Then max = s
If s < min Then min = s
Next i
sum = sum / 100
End Sub
Private Sub Command1_Click()
Call aaa(sum,max,min)
Print sum
Print max
Print "aaa"
Print min
End Su
VB,先产生100个0~67之间的随机数,编一子过程计算这些随机数的平均值、最大值、最小值.
利用VB如何设计下面问题:利用随机数产生10个1~100之间的随机数,显示出最大值,最小值及平均值.
vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值,
vb程序设计“生成10个二位数,求出其中的最大值、最小值、平均值,并指出最大最小值是第几个随机数”
设计一个数组,存放20个范围在(1,100)之间的随机数,每行显示五个.求该数组元素的平均值,最大值,最小值,
VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值
在VB中生成有n(n≥10)个随机数、并求出这个数组元素中的最大值、最小值和他们的平均值
用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写
用vb编程:利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值.
VB编程产生100个[10,99]的随机数
编写vfp程序,求50个值在0至100之间的随机数的平均值.
急求vb代码 单击“开始”按钮后每隔0.01秒产生2个随机数10-99之间的随机数