关于直接插入排序算法

发布网友 发布时间：2022-04-24 03:49

我来回答

共1个回答

热心网友 时间：2023-10-26 00:55

感觉你写的有点复杂了，这是我用pasical写的插入排序算法，你看看对比一下
for j:=2 to 5 do
begin
Temp := MyArr[j];
{注意如果不用i代替j的话，dec无法通过编译因为j的值即增有减是错误的}
i := j;
dec(i);
while MyArr[i] > Temp do
begin
MyArr[i+1] := MyArr[i];
Dec(i);
end;
MyArr[i+1] := Temp;
end;

热心网友 时间：2023-10-26 00:54

感觉你写的有点复杂了，这是我用pasical写的插入排序算法，你看看对比一下
for j:=2 to 5 do
begin
Temp := MyArr[j];
{注意如果不用i代替j的话，dec无法通过编译因为j的值即增有减是错误的}
i := j;
dec(i);
while MyArr[i] > Temp do
begin
MyArr[i+1] := MyArr[i];
Dec(i);
end;
MyArr[i+1] := Temp;
end;

热心网友 时间：2023-10-26 00:55

感觉你写的有点复杂了，这是我用pasical写的插入排序算法，你看看对比一下
for j:=2 to 5 do
begin
Temp := MyArr[j];
{注意如果不用i代替j的话，dec无法通过编译因为j的值即增有减是错误的}
i := j;
dec(i);
while MyArr[i] > Temp do
begin
MyArr[i+1] := MyArr[i];
Dec(i);
end;
MyArr[i+1] := Temp;
end;