数组排序-VB6.0教程

时间:2024-05-15 03:18:28
【文件属性】:

文件名称:数组排序-VB6.0教程

文件大小:3.12MB

文件格式:PPT

更新时间:2024-05-15 03:18:28

VB6.0教程

3.数组排序 例5.8 对已知存放在数组中的n个数,用选择法按递增顺序排序。 (1) 从n个数的序列中选出最小的数(递增),与第1个数交换位置; (2)除第1个数外,其余n-1个数再按(1)的方法选出次小的数,与第 2个数交换位置; (3)重复(1)n-1遍,最后构成递增序列。 For i = 1 To n - 1 iMin= i For j = i+1 To n If iA(j) < iA(iMin) Then iMin = j Next j t= iA(i): iA(i) = iA(iMin) : iA(iMin) = t Next I


网友评论