array := [3, 1, 4, 1, 5, 9, 2, 6, 5, 3, 5]
新array := SortArray(array)
; 转成字符串显示
JoinArray(新array, separator := " ") {
Loop, % 新array.MaxIndex()
result .= 新array[A_Index] . separator
return result
}
MsgBox % "排序后:" . JoinArray(新array) ; 用JoinArray转成了字符串显示
; 排序算法
SortArray(arr) {
i := 0
Loop % arr.MaxIndex() {
j := i + 1
Loop, % arr.MaxIndex() - i {
if (arr[j] < arr[j - 1])
temp := arr[j]
, arr[j] := arr[j - 1]
, arr[j - 1] := temp
j++
}
i++
}
Return arr
}
声明:站内资源为整理优化好的代码上传分享与学习研究,如果是开源代码基本都会标明出处,方便大家扩展学习路径。请不要恶意搬运,破坏站长辛苦整理维护的劳动成果。本站为爱好者分享站点,所有内容不作为商业行为。如若本站上传内容侵犯了原著者的合法权益,请联系我们进行删除下架。

评论(0)