咨询内容：

第n大值的编程

请问若要求最近100根K线的大小（每根K线的最高价减去最低价），从小到大升序排列，排在第10位大的那个值如何编程？
 

 

 来源:程序化99网（ WWW.CXH99.COM ）

博易技术人员：

FOR I:=1 TO 100 DO

X[I]:REF(H,I)-REF(L,I);

FOR S:=1 TO 100 DO 

FOR J:=1 TO 100-S DO 

IF X[J]>X[J+1] THEN

BEGIN

XX:=X[J];

X[J]:=X[J+1]; 

X[J+1]:=XX;

END

谢谢！能详细告知一下BEGIN...END里面3条语句的意思吗？
BEGIN 
XX:=X[J]; 
X[J]:=X[J1]; 
X[J1]:=XX; 
END 来源 程序化久久网