?
runmode:0;
n:=100;
ss:=0;
for i=1 to n do begin
? if h<h[barpos-i] then begin
???? ss:=ss+1;
???? break;
?? end
end
ss為所求值
打印本文
關閉窗口