10.18 最大面积 2432

题目

题解

学过初三数学或圆的相关知识的人都会求阴影部分面积。。。。。(垂径定理和勾股定理）

S阴=a∗[√r2−((1/2)a)2]+b∗[√r2−((1/2)b)2]−a∗b

然后就可以枚举a，b找最大值（a,b<=2r）

代码

var  r,a,b,i,j:longint;  c,max,b1,a1:double;begin  readln(r);  for i:=0 to r*2 do    for j:=0 to r*2 do      begin        a1:=sqrt(sqr(r)-sqr(0.5*i));        b1:=sqrt(sqr(r)-sqr(0.5*j));        c:=i*a1*2+j*b1*2-i*j;        if c>max then          begin            max:=c;            a:=i;b:=j;          end;      end;  writeln(a);  writeln(b);end.