vb编程 随机生成100个0-99的随机数,并以10*10的样式对齐显示,然后计算每行数字的平均数
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/05 10:08:11
vb编程 随机生成100个0-99的随机数,并以10*10的样式对齐显示,然后计算每行数字的平均数
随机生成100个0-99的随机数,并以10*10的样式对齐显示,
然后计算每行数字的平均数,并统计0—9,10-19...对应区间数字的个数.
随机生成100个0-99的随机数,并以10*10的样式对齐显示,
然后计算每行数字的平均数,并统计0—9,10-19...对应区间数字的个数.
先建一个大一点的label1框,然后...
Dim a As Integer
Dim b As String
Dim c As Integer
Dim d As String
Dim e As Integer
Dim f As Integer
Dim g As Integer
Dim h As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
Dim m As Integer
Dim n As Integer
Private Sub Form_Load()
For x = 1 To 10
For y = 1 To 10
a = Int(Rnd * 100)
Select Case a
Case Is < 10:
e = e + 1
Case Is < 20:
f = f + 1
Case a < 30:
g = g + 1
Case Is < 40:
h = h + 1
Case Is < 50:
i = i + 1
Case Is < 60:
j = j + 1
Case Is < 70:
k = k + 1
Case Is < 80:
l = l + 1
Case Is < 90:
m = m + 1
Case Is < 100:
n = n + 1
End Select
b = b & a & "、"
c = c + a
Next
c = c / 10
b = b & "avg:" & c & vbCrLf
c = 0
Next
Label1.Caption = b & "[0~9:" & e & "]、[10~19:" & f & "]、[20~29:" & g & "]、[30~39:" & h & "]、[40~49:" & i & "]、[50~59:" & j & "]、[60~69:" & k & "]、[70~79:" & l & "]、[80~89:" & m & "]、[90~100:" & n & "]"
End Su
Dim a As Integer
Dim b As String
Dim c As Integer
Dim d As String
Dim e As Integer
Dim f As Integer
Dim g As Integer
Dim h As Integer
Dim i As Integer
Dim j As Integer
Dim k As Integer
Dim l As Integer
Dim m As Integer
Dim n As Integer
Private Sub Form_Load()
For x = 1 To 10
For y = 1 To 10
a = Int(Rnd * 100)
Select Case a
Case Is < 10:
e = e + 1
Case Is < 20:
f = f + 1
Case a < 30:
g = g + 1
Case Is < 40:
h = h + 1
Case Is < 50:
i = i + 1
Case Is < 60:
j = j + 1
Case Is < 70:
k = k + 1
Case Is < 80:
l = l + 1
Case Is < 90:
m = m + 1
Case Is < 100:
n = n + 1
End Select
b = b & a & "、"
c = c + a
Next
c = c / 10
b = b & "avg:" & c & vbCrLf
c = 0
Next
Label1.Caption = b & "[0~9:" & e & "]、[10~19:" & f & "]、[20~29:" & g & "]、[30~39:" & h & "]、[40~49:" & i & "]、[50~59:" & j & "]、[60~69:" & k & "]、[70~79:" & l & "]、[80~89:" & m & "]、[90~100:" & n & "]"
End Su
vb编程 随机生成100个0-99的随机数,并以10*10的样式对齐显示,然后计算每行数字的平均数
vb编程 随机生成20个【1,100】以内的整数,以每行五个输出其中的奇数,并统计输出奇数的个数.
vb语句 设计一个随机数程序,生成10个范围是1到100随机整数,并求出这10个数的最大值,最小值和平均数
VB编程产生100个[10,99]的随机数
C语言编程,输入10个数字计算平均数,并输出大于平均数的元素
用VB编程:随机产生10个0~100之间的随机整数,存放在一个数组中,然后求个元素和、平均值,统计
Vb小编程用随机函数生成10个100以内的的整数 找出最大值 并指出是第几个数
用vb编程:利用随机函数产生50-100范围内的20个随机数,显示其中的最大值、最小值和平均值.
VB编程:单击command1,则随机产生10个0~100之间的数值,将之保存到一维数组中a中,同时显示在text1中.
vb中随机产生10个1—100之间的数,求出小于这十个平均数的数字个数.
我想知道,用vb编程,生成10个0-100之间的随机数,要求分别求出其中所有基数之和以及所有偶数之和,该怎么
vb中随机生成10个10~90的整数,把能被3整除的随机数从小到大排序