论坛 › Delphi交流 › 冒泡排序的问题

带刀刺客 发表于 2014-12-20 22:31:06

冒泡排序的问题

var
l,j,k,n:integer;
begin
【for l:=1 to i-1 do       这到
begin
K:=i-l;               
for j:=1 to k do】 这的意思是什么
begin
if(num< num) then
begin
n:=num;
num:=num;
num:=n;
   end;
end;
   end;
   label1.Caption:='';
   【for l:=i-1 downto 1 do】这段是什么意思
   label1.Caption:=label1.Caption+inttostr(num)+' ';
   end;
end.


求教导

我勒个去，小二 发表于 2014-12-27 01:22:13

你再多看几遍，视频里讲的很清楚了..

查看完整版本: 冒泡排序的问题