主题：求循环语句写法，谢谢老师

hh-ll差值最小时，i和j的值分别是多少，如果有相同的值，取小的i或j值

RUNMODE:0;

II:0;
JJ:0;
DIF:=0;

FOR I = 25 TO 65 DO
BEGIN
 FOR J = 2 TO 24 DO
 BEGIN
  HH:=llv(h,i);
  LL:=hhv(l,j);
  
  //防止小于65周期时计算出错
  IF BARPOS > 65 THEN
  BEGIN
   IF HH - LL <  DIF THEN
   BEGIN
    DIF:=HH-LL;
    II:=I;
    JJ:=J;
   END;
  END;
 END;
END;

管理员太强大了，谢谢两位大牛！