VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值

来源:学生作业帮助网 编辑:六六作业网 时间:2024/04/29 22:35:16
VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值VB

VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值
VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值

VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值
Private Sub Form_click()
Dim n(1 To 20) As Integer
Dim i,j,ave,temp
Randomize
For i = 1 To 20
n(i) = Int((51 * Rnd) + 50)
Print n(i)
Next i
For j = 1 To 19
For i = j + 1 To 20
If n(i) >= n(j) Then
temp = n(i)
n(i) = n(j)
n(j) = temp
End If
Next
Next
ave = 0
For i = 1 To 20
ave = ave + n(i)
Next
ave = ave / 20
Print "最大值为:"; n(1)
Print "最小值为:"; n(20)
Print "平均值为:"; ave
End Sub

VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值 vb语言中利用随机函数产生20个50~100之间的随机整数,显示他们的最大值,最小值和 写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值 vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值, 用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写 利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值VB 的题, 用vb编程:利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值. 急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出 利用随机函数产生10个30~100之间的随机正整数,求最大值,最小值 平均值,并显示数组的值和结果用VB程序设计 利用随机函数产生100个10~99之间的随机整数,找出其中的奇数和素数,并将奇数按从小到大的顺序排列vb语言. vb利用随机函数产生100个0到9之间的整数,统计一共产生了多少个0,多少个1,统计结果 VB利用随机函数Rnd(),随机产生3个50至100的整数,按从小到大的顺序显示.求代码代码要简单一点的,我才大一. vb 编程 如何利用随机函数产生15个10到90的奇数组成的数列,并显示在标签中?要程序 vb中利用随机函数产生30个不同的三位正整数,打印出这30个数,然后将它们按从大到小的次序排序 VB题 .利用随机函数rnd产生30个10~100之间的整数,再将它们按照由小到大的顺序排列输出 vb利用随机函数产生50个1—6之间的整数,分别统计出1的个数,2的个数,3的个数,4的个数,5的个 VB利用随机函数产生30个[3,99]整数,打印输出其中的素数(要求用数组存放)