随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 07:25:38

随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序
随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序

随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序
选择法:
Private Sub Form_Click()
Dim i%,j%,a%(1 To 10)
Randomize
For i = 1 To 10
a(i) = Int(101 * Rnd)
Next i
For i = 1 To 9
k = i
For j = i + 1 To 10
If a(j) < a(k) Then k = j
Next j
If k i Then t = a(i):a(i) = a(k):a(k) = t
Next i
For i = 1 To 10
Print a(i);
Next
End Sub
冒泡法:
Private Sub Form_Click()
Dim i%,j%,a%(1 To 10)
Randomize
For i = 1 To 10
a(i) = Int(101 * Rnd)
Next i
For i = 1 To 10
For j = 1 To 10 - i
If a(j) > a(j + 1) Then
k = a(j):a(j) = a(j + 1):a(j + 1) = k
End If
Next j
Next i
For i = 1 To 10
Print a(i);
Next
End Sub

随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序 VB用数组保存随机产生的10个介于20到50之间的整数,编程求出最大值,最小值,和平均 产生10个1到20之间没有重复的随机整数 VB随机产生10个100到200之间的整数,将其按从大到小顺序排列 vb利用随机函数产生100个0到9之间的整数,统计一共产生了多少个0,多少个1,统计结果 在EXCEL中如何使用随机函数在一块区域中产生介于0-9之间的不重复的整数?每次产生10个数,并且不重复的;一位数整数; Vb 随机函数产生20个10到50之间的数,放入数组,并且计算所有20个随机整数的平均值并输出 VB 随机产生10个0~100之间的随机整数,去掉最大值与最小值,剩下8个数的和与平均数.VB matlab中如何产生10个1--4之间的随机整数?在matlab中如何产生10个1到4之间的随机整数呢?初用matlab,不知如何开始,在matlab中如何产生10个1到4之间的随机整数呢?比如:4,2,4,1,3,2,4,1,1,2,不知道怎么编 求一VB代码,用数组保存随机产生的10个介于20到50之间的整数,编程求出其中的最大数、最小数和平均值,并并将它们显示在窗体上提示:使用选择结构和循环结构 通过随机函数在1~100之间产生的30个随机整数,求出平均值,并将这30个随机整数以每行5个数形式输出 C++中怎样产生一个1到100之间的随机整数?请写出完整代码, SQL用随机函数产生10个100—999之间的整数,分别统计出奇、偶数的个数. C语 随机产生20个0—100之间的整数,允许有重复数据结构课程设计 VB随机产生10个10到100的整数,每行输出10个代码怎么写?必须是基数 急求VB编程“利用随机函数产生10个50-100之间的随机整数,求它们的最大值和平均值,要求用数组做”, 利用随机函数产生100个10~99之间的随机整数,找出其中的奇数和素数,并将奇数按从小到大的顺序排列vb语言. 在EXCEL中如何利用RAND函数来产生一个介于0到+50的随机函数及-2到+6的随机函数,且带正负号整数,EXCEL2003.