早教吧 育儿知识 作业答案 考试题库 百科 知识分享

vb编个程序,求算法最简变,或运算时间最短的思路:随机生成1000个数字,我要找出一个在这1000个数里出现次数最多,并最小的一个我的意思是出现最多的那个是这1000个数里最小的,因为出现次数

题目详情
vb编个程序,求算法最简变,或运算时间最短的
思路:随机生成1000个数字,我要找出一个在这1000个数里出现次数最多,并最小的一个
我的意思是出现最多的那个是这1000个数里最小的,因为出现次数最多的有可能有好几个数,比如,2,4,8这三个数都是出现10次的,但要找出的是最小的2这个数
▼优质解答
答案和解析
Private Sub Command1_Click()
Dim a(10000) As Integer, n As Integer
n = CInt(InputBox("请输入产生的最大数(