产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/28 14:20:00
产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据

产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据
产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb
产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据和平均值.

产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据
代码如下:
Private Sub Command1_Click()
Dim a(10) As Integer
Picture1.Print "排序前:"
For i = 1 To 10
Randomize
a(i) = Int(Rnd * 900) + 100
s = s + a(i)
Picture1.Print a(i);
Next i
s = s / 10
Picture1.Print
Picture1.Print "排序后:"
For i = 1 To 9
For j = 1 To 10 - i
If a(j) < a(j + 1) Then
r = a(j)
a(j) = a(j + 1)
a(j + 1) = r
End If
Next j
Next i
For i = 1 To 10
Picture1.Print a(i);
Next i
Picture1.Print
Picture1.Print "平均值:" & s
End Sub

产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值Vb产生10个三位随机数,打印出所有的数,然后降序输出,并求出其中的平均值.在picture控件中显示原始数据、排序后数据 算出小于100的10个不重复的随机数,放入数组,并且打印出来 vb中利用随机函数产生30个不同的三位正整数,打印出这30个数,然后将它们按从大到小的次序排序 matlab产生随机数后 需要利用这些随机数进行运算 用什么变量表示这些数?比如我产生10个随机数 再相加? pascal 让电脑产生10个随机数,算出它们的平均数,从小到大排列 打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字立方和等于该数本身.用C语言 打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字的立方和等于该数本身.用C语言编程序 编写程序:打印出所有的“水仙花数”,所谓“水仙花数”是指一个三位数,其各位数字立方和等于该数本身. 打印出所有的“水仙花数”,所谓“水仙花数”是指一个3位数,其各位数字立方和等于该数本身.例如153是一 水仙花数是指一个三位数,其各位数字立方和等于该数本身.编写程序,打印出所有的水仙花数. 用vb.net产生10个1到1000随机数,数之间要空开 用C语言编写程序 输入一个三位整数,打印出其各位数,十位数和百位数 利用VB如何设计下面问题:利用随机数产生10个1~100之间的随机数,显示出最大值,最小值及平均值. vb编程 产生20个0到99之间的随机数,将其中5和3的倍数打印出来 编一个程序,用函数实现:对输入一个三位整形数据,打印出其个位数,十位数和百位数 编写程序,产生10 个随机数,然后按产生顺序相反的次序输出这些随机数 在excel中,如何产生不在同一区间段内的一组随机数,这些数是三位小数.比如20-25之间的数,23.365.重要的是在填写其他表格的时候不要再变动.比如我用个这个公式=RANDBETWEEN(-5,7)/10 ,结果是我每输 C语言 打印出所有的“水仙花数”,所谓“水仙花数”是指一个3位数,其各位数字立方和等于该数本身.例如,153是一个水仙花数,因为153=13+53+33.