写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值
来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/29 14:02:54
写VB代码
利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值
利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值
Private Sub Form_Click()
Dim a(19) As Integer
Dim max As Integer, min As Integer, av As Integer
For i = 0 To 19
a(i) = Int((100 - 50 + 1) * Rnd + 50)
Print a(i); '显示
If i = 0 Then max = a(i): min = a(i)
If max < a(i) Then max = a(i) '最大值
If min > a(i) Then min = a(i) '最小值
av = av + a(i)
Next i
Print
Print "最大值:" & max
Print ; "最小值:" & min
Print ; "平均值:" & av / 20
End Su
Dim a(19) As Integer
Dim max As Integer, min As Integer, av As Integer
For i = 0 To 19
a(i) = Int((100 - 50 + 1) * Rnd + 50)
Print a(i); '显示
If i = 0 Then max = a(i): min = a(i)
If max < a(i) Then max = a(i) '最大值
If min > a(i) Then min = a(i) '最小值
av = av + a(i)
Next i
Print "最大值:" & max
Print ; "最小值:" & min
Print ; "平均值:" & av / 20
End Su
写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值
VB方面的:利用随机函数产生20个50--100范围内的随机数,显示它们的最大值,最小值,和平均值
急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”,
用VB程序写出“利用随机函数产生20个50~100范围内的随机数,显示他们的最大值、最小值和平均值.”怎么写
用vb编程:利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值.
利用随机函数产生50-100范伟内的20个随机数,显示其中的最大值,最小值和平均值
利用随机函数产生50-100范围内的20个随机数,显示其中最大值,最小值和平均值
vb语言中利用随机函数产生20个50~100之间的随机整数,显示他们的最大值,最小值和
pascal 利用随机函数产生的20个50—100范围内的随机数,显示它们的最大值、最小值和平均值.
利用随机函数产生50-100范围内的20个随机整数,显示其中的最大值、最小值、平均值
VB,用VB语言写!随机产生10个两位整数,求期中的最大值,最小值和平均值.
vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值,