VB随机产生1000个10-99之间的随机数,统计出现次数最多的数是哪几个?

来源：学生作业帮编辑：搜狗做题网作业帮分类：数学作业时间：2024/08/06 04:35:05

Private Sub Command1_Click()
Dim a(10 To 99) As Integer
For i = 1 To 1000
x = Int(90 * Rnd()) + 10 ‘产生10~99的随机数
a(x) = a(x) + 1 ’统计此数个数
Next i
Max = -1
For i = 10 To 99
If a(i) > Max Then Max = a(i) ‘找出个数最多的数
Next i
For i = 10 To 99
If a(i) = Max Then Print i; ’输出所有个数为Max的随机数
Next i
Print
End Su

VB随机产生1000个10-99之间的随机数,统计出现次数最多的数是哪几个? JAVA问题：随机产生50个10以内（0-9）的整数,统计每个数出现的次数,以及出现次数最多的数? VB中怎么统计随机十组随机数数组后第一位出现最多的某个数字 vb问题利用随机函数产生80个10～99之间的随机整数, 用VB编程：随机产生10个0~100之间的随机整数,存放在一个数组中,然后求个元素和、平均值,统计急求vb代码单击“开始”按钮后每隔0.01秒产生2个随机数10-99之间的随机数 VB:产生30个1-100之间的随机数,统计并输出其中奇数和偶数的个数 vb利用随机函数产生100个0到9之间的整数,统计一共产生了多少个0,多少个1,统计结果关于Java的HashMap使用.想产生40个随机数,从10-50,然后分别统计各个数字出现的次数. VB编程产生100个[10,99]的随机数编程 C语言随机产生十个数并统计其中各个数字出现的次数 vb随机数 1000 没次随机出现1个数,1000次内不出现重复的数