2011年5月30日
摘要: 该算法参考的严蔚敏老师97版 C语言版的快排算法(没有做枢轴的优化),使用了递归调用的方式。代码经调试运行无误(控制台程序)。 1 Dim arr 2 Dim low 3 Dim high 4 arr = Array(1,99,58.32,8,7,3,4.18,2,6,14,65,9,23,43,78,9) 5 6 low = Lbound(arr) 7 high = Ubound(arr) 8 9 '===调用快速排序===10 QuickSort arr,low,high 11 12 For i = 0 to Ubound(arr)13 Response.Write(arr(i)& 阅读全文
posted @ 2011-05-30 13:13 香椿炒鸡蛋 阅读(595) 评论(0) 推荐(0) 编辑