自适应Simpson公式

参考刘汝佳<算法指南>P163

#include<cstdio>
#include<cmath>
double a;
double F(double x){
    return sqrt(+*a*a*x*x);
}
double simpson(double a,double b)
{
    double c=a+(b-a)/;
    return (F(a)+*F(c)+F(b))*(b-a)/;
}
double asr(double a,double b,double eps,double A)
{
    double c=a+(b-a)/;
    double L=simpson(a,c),R=simpson(c,b);
    if(fabs(L+R-A)<=*eps) return L+R+(L+R-A)/15.0;
    return asr(a,c,eps/,L)+asr(c,b,eps/,R);
}
double ASR(double a,double b,double eps){
    return asr(a,b,eps,simpson(a,b));
}
double parabola_arc_length(double w,double h)
{
    a=4.0*h/(w*w);
    return ASR(,w/,1e-)*;
}
int main()
{
    int T;
    scanf("%d",&T);
    for(int cas=;cas<=T;cas++){
        int D,H,B,L;
        scanf("%d%d%d%d",&D,&H,&B,&L);
        int n=(B+D-)/D;
        double D1=(double)B/n;
        double L1=(double)L/n;
        double x=,y=H;
        while(y-x>1e-){
            double m=x+(y-x)/;
            if(parabola_arc_length(D1,m)<L1) x=m;
            else y=m;
        }
        if(cas>) printf("\n");
        printf("Case %d:\n%.2lf\n",cas,H-x);
    }
}