简化多空线(大智慧)(飞狐)

{简化多空线}

INPUT:N(10,1,999);

a:=(3*c+l+o+h)/6;

b:0;

for i=0 to 19 do begin

b:=b+(20-i)*ref(a,i);

end;

b:=b/210;

D:ma(b,n);