VB 随机产生35个 20到80的随机整数
来源:学生作业帮 编辑:拍题作业网作业帮 分类:数学作业 时间:2024/04/28 18:18:29
VB 随机产生35个 20到80的随机整数
第二题 一只小球从 10米高度上自由落下,每次反弹回原高度的百分之40%,在落下,计算小球第8次落地时共经过的高度
第二题 一只小球从 10米高度上自由落下,每次反弹回原高度的百分之40%,在落下,计算小球第8次落地时共经过的高度
Private Sub Command1_Click()
Dim Zs(1 To 35) As Integer
For i = 1 To 35
Randomize
Zs(i) = Int(61 * Rnd) + 20
Print Zs(i);
Next i
End Sub
Private Sub Command2_Click()
s = 10
Sum = s
For i = 2 To 8
s = 0.4 * s
Sum = Sum + 2 * s
Next i
Print Sum
End Sub
再问: 第一个是20 到 80 循环 35次 用 if 的
再答: 为什么要用if?看不明白你的追问。
Dim Zs(1 To 35) As Integer
For i = 1 To 35
Randomize
Zs(i) = Int(61 * Rnd) + 20
Print Zs(i);
Next i
End Sub
Private Sub Command2_Click()
s = 10
Sum = s
For i = 2 To 8
s = 0.4 * s
Sum = Sum + 2 * s
Next i
Print Sum
End Sub
再问: 第一个是20 到 80 循环 35次 用 if 的
再答: 为什么要用if?看不明白你的追问。
VB 随机产生35个 20到80的随机整数
vb问题利用随机函数产生80个10~99之间的随机整数,
Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出
VB:随机产生 10 个整数,求其中最小的数.若随机产生n个整数又如何实现
VB编程,产生20个0~350之间的随机整数
VB随机产生10个10到100的整数,每行输出10个代码怎么写?
vb用function编写一个产生随机整数过程,输出n个指定范围的随机整数
VB随机产生10个100到200之间的整数,将其按从大到小顺序排列
VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均
求VB 程序设计利用随机函数产生80个10~99之间的随机整数,将其中的偶数按由小到大的顺序排列并输出,将奇
写VB代码利用随机函数产生20个50~100之间的随机整数,显示它们的最大值、最小值、和平均值
vb语言中利用随机函数产生20个50~100之间的随机整数,显示他们的最大值,最小值和