%>
{简化多空线}INPUT:N(10,1,999);a:=(3*c+l+o+h)/6;b:0;for i=0 to 19 do beginb:=b+(20-i)*ref(a,i);end;b:=b/210;D:ma(b,n);