vb中怎样分别用选择法和冒泡法分别对100个随机数进行递增排序?
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/07/05 16:51:01
vb中怎样分别用选择法和冒泡法分别对100个随机数进行递增排序?
能运行就给高分,最好每步有说明,
能运行就给高分,最好每步有说明,
Private Sub Command1_Click()
Dim a(1 To 100) As Integer
For i = 1 To 100
Randomize
a(i) = Int(Rnd * 900 + 100) '产生100至999之间的整数
Next i
For i = 1 To 99
Dim t As Integer
t = i
For j = i + 1 To 100
If a(t) > a(j) Then t = j '找出最小数的下标
Next j
b = a(i): a(i) = a(t): a(t) = b '交换两数的值
Next i
For i = 1 To 100 '输出排序后数组
Print a(i);
If i Mod 10 = 0 Then Print '如果一行输出达十个,换行输出
Next i
End Su
Dim a(1 To 100) As Integer
For i = 1 To 100
Randomize
a(i) = Int(Rnd * 900 + 100) '产生100至999之间的整数
Next i
For i = 1 To 99
Dim t As Integer
t = i
For j = i + 1 To 100
If a(t) > a(j) Then t = j '找出最小数的下标
Next j
b = a(i): a(i) = a(t): a(t) = b '交换两数的值
Next i
For i = 1 To 100 '输出排序后数组
Print a(i);
If i Mod 10 = 0 Then Print '如果一行输出达十个,换行输出
Next i
End Su
vb中怎样分别用选择法和冒泡法分别对100个随机数进行递增排序?
vb 将选择排序法和冒泡排序法分别改为通用过程
VB随机产生10个两位数整数(正整数),要求分别用选择排序法和冒泡排序法将这10个数降序排列输出在窗体上
随机产生10个介于0到100之间的整数,分别使用选择法和冒泡法对其进行升序排序
VB语言随机产生10个10-99内的整数,分别用冒泡法和选择法将数据从大到小排序并显示结果
c语言的一题目:分别用冒泡法和选择法对10个数排序!
VB编程,分别用选择排序法和冒泡排序法实现有N个元素数组的排序.N由键盘输入,数组元素的值在1~200之间,随机产生
VB.分别选择和冒泡排序法排a(1 to 50),我应试,希望越教科越好,并有注释
在键盘里输入10个学生的成绩,用冒泡排序法从大到小进行排序,分别输出原始成绩和排序后的成绩
C语言用冒泡法和选择法对10个数进行排序
1. 编一个程序,产生30个随机整数,存入数组,用冒泡法或选择法分别对其进行排序.要求显示排序前后的数
对N个元素进行排序,用冒泡法进行排序时,共需排几次?