四边形的问题可以转化为三角形处理穷举对角线,然后处理上下两个三角形,旋转卡壳 ..] of double; q:..] of longint; l,r,i,j,k,t,n:longint; ans:double; function max(a,b:double):double; begin if a>b then exit(a) else exit(b); end; function cross(i,j,k,r:longint):double; begin exit((x[i]-x[j])*(y…