鱼C论坛

 找回密码
 立即注册
查看: 2254|回复: 1

我的这个冒泡排序算法,一次不会成功,求纠错!谢谢,找了一天了!

[复制链接]
发表于 2013-2-24 17:53:09 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能^_^

您需要 登录 才可以下载或查看,没有账号?立即注册

x
注:j-1为数组中最后一个数的下标
For i:=1 To j-2 Do
    begin
      For m:=i To j-2 Do
        begin
          If(num[m] < num[m+1]) Then
            begin
              max:= num[m+1];
              num[m+1]:=num[m];
              num[m]:= max;
            end;
        end;
    end;
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
发表于 2013-4-1 00:29:23 | 显示全部楼层
For m:=i To j-2 Do
看下这里
想知道小甲鱼最近在做啥?请访问 -> ilovefishc.com
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

小黑屋|手机版|Archiver|鱼C工作室 ( 粤ICP备18085999号-1 | 粤公网安备 44051102000585号)

GMT+8, 2024-12-23 08:52

Powered by Discuz! X3.4

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表