当前位置:asp编程网>技术教程>Asp教程>  正文

asp教程:asp插入排序法

1970-01-01 08:00:00   来源:www.aspbc.com    作者:wangsdong   浏览量:2285   收藏
上一篇文章介绍了asp冒泡排序法,这次介绍另一种排序法:插入排序法。代码如下:
<%
function insertSort(byval b)
  '插入排序法
  for i=1 to ubound(b)
	  j=i
	  key=b(i)			
	  while(j>0)
		  if key < b(j-1) then			    
			  t=b(j-1)
			  b(j-1)=key
			  b(j)=t				
			  key=b(j-1)			
		  end if
		  j=j-1
	  wend		
  next
  insertSort = b
end function

a=array(49,38,65,97,76,13,27)  
response.write "初始顺序: "
for i=0 to ubound(a)
  response.write a(i)&" "
next
response.write "<hr>" 

a = insertSort(a)

response.write "最终排序结果:"
for i=0 to ubound(a)
  response.write a(i)&" "
next 
%>
(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)

这里面的insertSort(byval b)函数就是插入排序法的具体写法。

原创文章,转载请注明来源:asp编程网(www.aspbc.com),谢谢。

 

 



关于我们-广告合作-联系我们-积分规则-网站地图

Copyright(C)2013-2017版权所属asp编程网