怎样用VB做随机产生10个1-100以内的整型数,求出其的最大值,最小值,平均值
来源:学生作业帮 编辑:大师作文网作业帮 分类:综合作业 时间:2024/11/12 21:21:40
怎样用VB做随机产生10个1-100以内的整型数,求出其的最大值,最小值,平均值
这样才对 初始化应加在For 循环里 s要变为双精度(这样平均数才有小数点后几位)
楼主试我这个:
Private Sub Command1_Click()
Dim i%,j%,max%,min%,s%
For i = 1 To 10
Randomize
j = Int(Rnd * 100 + 1)
If i = 1 Then min = j
If j > max Then max = j
If j < min Then min = j
s = s + j
Print j;
Next
Print
Print "最大值,最小值,平均数分别为:"; max; min; Cdbl(s) / 10
End Su
楼主试我这个:
Private Sub Command1_Click()
Dim i%,j%,max%,min%,s%
For i = 1 To 10
Randomize
j = Int(Rnd * 100 + 1)
If i = 1 Then min = j
If j > max Then max = j
If j < min Then min = j
s = s + j
Print j;
Next
Print "最大值,最小值,平均数分别为:"; max; min; Cdbl(s) / 10
End Su
怎样用VB做随机产生10个1-100以内的整型数,求出其的最大值,最小值,平均值
VB计算:随机产生20个1~100的正整数放入数组中,显示产生的数,并求出其最大值
vb利用随机函数产生50到100范围的30个随机数,显示其中最大值,最小值,平均值,
随机产生任意个20个50~100的整数,求最大值、最小值,平均值,并统计高于平均值的个数.
vb 随机产生10个100-200之间的数 求最大值
利用随机函数产生50-100范围内的20个随机整数,显示其中的最大值、最小值、平均值
vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数.
问一个VB基础题啊 怎么随机产生10个30到100的数,求最大值、最小值和平均值.输出结果
VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均
vb语句 设计一个随机数程序,生成10个范围是1到100随机整数,并求出这10个数的最大值,最小值和平均数
利用VB如何设计下面问题:利用随机数产生10个1~100之间的随机数,显示出最大值,最小值及平均值.
利用随机函数产生10个30~100之间的随机正整数,求最大值,最小值 平均值,并显示数组的值和结果