vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数.
来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/11/07 16:47:54
vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数.
通过Sub Main启动
Sub main()
Dim a(9) As Integer,p As Double,i As Integer,n As Integer
p = 0
n = 0
For i = 0 To 9
a(i) = Rnd * 100
p = p + a(i)
Next
p = p / 10
For i = 0 To 9
If a(i) < p Then n = n + 1
Next
MsgBox n,vbInformation,"提示"
End Su
Sub main()
Dim a(9) As Integer,p As Double,i As Integer,n As Integer
p = 0
n = 0
For i = 0 To 9
a(i) = Rnd * 100
p = p + a(i)
Next
p = p / 10
For i = 0 To 9
If a(i) < p Then n = n + 1
Next
MsgBox n,vbInformation,"提示"
End Su
vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数.
VB 随机产生10个0~100之间的随机整数,去掉最大值与最小值,剩下8个数的和与平均数.
VB 编程题,产生50个1~100之间的随机整数,显示所有小于60的数.
vb语句 设计一个随机数程序,生成10个范围是1到100随机整数,并求出这10个数的最大值,最小值和平均数
vb程序设计——用数据保存随机产生的10个介于20~50之间的整数,求最大数,最小数和平均数
VB编程题目单击按钮随机产生5个0-9之间不同的整数并排序,试求出5个数能组合的所有5位数显示在文本框中,并求出最大数和
怎样用VB做随机产生10个1-100以内的整型数,求出其的最大值,最小值,平均值
通过随机函数在1~100之间产生的30个随机整数,求出平均值,并将这30个随机整数以每行5个数形式输出
vb 随机产生10个100-200之间的数 求最大值
VB计算:随机产生20个1~100的正整数放入数组中,显示产生的数,并求出其最大值
VB 编程题,产生50个1~100之间的随机整数,显示所有小于60的数.我真心想不会.
VB随机产生10个两位数,求出他们的总和及平均数.(或按奇偶行排列)