作业帮 > 数学 > 作业

VB.用随机函数产生100个【0,99】范围内的随机整数,统计个位上的数字为0,1,2..9的元素个数(使用数组

来源:学生作业帮 编辑:百度作业网作业帮 分类:数学作业 时间:2024/04/28 13:14:59
VB.用随机函数产生100个【0,99】范围内的随机整数,统计个位上的数字为0,1,2..9的元素个数(使用数组
急 求 亲们!
VB.用随机函数产生100个【0,99】范围内的随机整数,统计个位上的数字为0,1,2..9的元素个数(使用数组
Dim m(99) As Integer,n(9) As Integer,i As Integer,k As Integer
Randomize
For i = 0 To 99
m(i) = Int(Rnd * 100)
Print m(i);
k = m(i) Mod 10
n(k) = n(k) + 1
Next
Print
For i = 0 To 9
Print "个位数为" & i & "的数有" & n(i) & "个"
Next