首页 > 开发 > Asp > 正文

asp 实现的冒泡排序程序

2020-06-20 13:17:06
字体:
来源:转载
供稿:网友
复制代码 代码如下:
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
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表