当前位置:首页 > ASP教程 > 应用技巧

asp 实现的冒泡排序程序

复制代码 代码如下:

arr = array(12,52,14,43,24,58,15,64,24,57,17,56,45)
arrlen = ubound(arr)

for i=0 to arrlen-1
for j = 0 to (arrlen -1)-i
if arr(j)>arr(j+1) then
temp = arr(j)
arr(j)= arr(j+1)
arr(j+1) = temp
end if
next
next

for each l in arr
response.write l&"<br>"
next

【说明】本文章由站长整理发布,文章内容不代表本站观点,如文中有侵权行为,请与本站客服联系(QQ:)!