主题：对一个K线上引用的N个序列变量进行排序

两两比较，得出第N名的值，然后才可以成功应用获得符合预期的结果，12个月份都有的品钟比较起来，非常麻烦了，呵呵呵

variable:X[6]:=0;
X[1]:=OPI01;
X[2]:=OPI03;
X[3]:=OPI05;
X[4]:=OPI07;
X[5]:=OPI09;
X[6]:=OPI11;
for i=1 to 5 do
begin
for j=i+1 to 6 do
begin
 if(X[i]<X[j])do
 begin
 k:=X[i];
 X[i]:=X[j];
 X[j]:=k;
 end;
end;
end;
oh:=X[1];

 

为何前面的循环取最大值无法成功，而下面的的代码就可以呢？

oh1:=max(OPI01,OPI03);
oh2:=max(OPI05,OPI07);
oh3:=max(oh1,oh2);
oh4:=max(OPI09,OPI11);
oh:=max(oh3,oh4);