a:=0;
for j=0 to 100 do begin
for i=0 to 99 do begin
if h[barpos-i]-l[barpos-i]=j then a:=a+1;
end
if a>=90 then begin
jj:=j;
break;
end
end
jj为所求值
jjj:jj;
加一句,看下jjj的值就是了
发个截图看一下错误信息
jjj:jj;
加一句,看下jjj的值就是了
这句代码加了没
这句代码加了没
加了:
a:=0;
for j=0 to 100 do begin
for i=0 to 99 do begin
if h[barpos-i]-l[barpos-i]=j then a:=a+1;
end
if a>=90 then begin
jj:=j;
break;
end
end
JJ1:JJ;