三分的入门题,如果从AB上一点走到D是一个单峰函数从AB开始向CD传送带走的那个点也是一个单峰函数显然三分套三分 const eps=1e-5; var ax,ay,bx,by,cx,cy,dx,dy,p,q,v:longint; l,r,m:double; function calc(r1,r2:double):double; var s1,s2,s3,x1,x2,y1,y2:double; begin x1:=ax+(bx-ax)*r1; y1:=ay+(by-ay)*r1; x2:=cx+…