VB 怎么用数组求最大数和最小数 以及排序

Question

求最简单的方法 排序的话讲讲 快速排序法

Answer 1

1、选择法排序算法思想： 1）对有n+1个数的序列（存放在数组a(n)中），从中选出最小（升序）或最大（降序）的数，与第1个数交换位置； 2）除第1 个数外，其余n个数中选最小或最大的数，与第2个数交换位置； 3）依次类推，选择了n次后，这个数列已按升序排列。例：For i = 0 To n - 1 p = i For j = i + 1 To n If a(p) > a(j) Then p = j Next j temp = a(i) a(i) = a(p) a(p) = tempNext i2、 冒泡法排序（递增） 算法思想：(将相邻两个数比较，大的调到后头) 1）有n+1个数（存放在数组a(n)中），第一趟将每相邻两个数比较，大的调到后头，经n次两两相邻比较后，最大的数已“沉底”，放在最后一个位置，小数上升“浮起”； 2）第二趟对余下的n个数（最大的数已“沉底”）按上法比较，经n-1次两两相邻比较后得次大的数； 3）依次类推，n+1个数共进行n趟比较。For i=0 To n - 1 For j = 0 To n-1-i If a(j) > a(j+1) Then temp=a(j) a(j)=a(j+1) a(j+1)=temp End if Next jNext i本回答被网友采纳