0_0_4475942_21612\Main.java:6: 需要为 class、interface 或 enum
Program cup;
^
0_0_4475942_21612\Main.java:7: 需要为 class、interface 或 enum
Const inf='cup.in';
^
0_0_4475942_21612\Main.java:7: 未结束的字符字面值
Const inf='cup.in';
^
0_0_4475942_21612\Main.java:7: 未结束的字符字面值
Const inf='cup.in';
^
0_0_4475942_21612\Main.java:8: 未结束的字符字面值
ouf='cup.out';
^
0_0_4475942_21612\Main.java:8: 未结束的字符字面值
ouf='cup.out';
^
0_0_4475942_21612\Main.java:10: 需要为 class、interface 或 enum
Var r1,r2,H,v,tmph,dtr,sdtr,tmpr,tmpv,allh:extended; // r1<=r2
^
0_0_4475942_21612\Main.java:12: 需要为 class、interface 或 enum
Procedure init;
^
0_0_4475942_21612\Main.java:13: 需要为 class、interface 或 enum
begin
^
0_0_4475942_21612\Main.java:14: 需要为 class、interface 或 enum
assign(input,inf); reset(input);
^
0_0_4475942_21612\Main.java:15: 需要为 class、interface 或 enum
assign(output,ouf); rewrite(output);
^
0_0_4475942_21612\Main.java:15: 需要为 class、interface 或 enum
assign(output,ouf); rewrite(output);
^
0_0_4475942_21612\Main.java:16: 需要为 class、interface 或 enum
readln(r1,r2,h,v);
^
0_0_4475942_21612\Main.java:17: 需要为 class、interface 或 enum
close(input);
^
0_0_4475942_21612\Main.java:18: 需要为 class、interface 或 enum
dtr:=r2-r1;
^
0_0_4475942_21612\Main.java:19: 需要为 class、interface 或 enum
if dtr<>0 then
^
0_0_4475942_21612\Main.java:21: 需要为 class、interface 或 enum
end;
^
0_0_4475942_21612\Main.java:24: 需要为 class、interface 或 enum
Procedure try(minh,maxh:extended);
^
0_0_4475942_21612\Main.java:25: 需要为 class、interface 或 enum
begin
^
0_0_4475942_21612\Main.java:26: 需要为 class、interface 或 enum
if maxh-minh<0.00000001 then begin writeln((minh+maxh)/2:0:6); close(output); halt; end;
^
0_0_4475942_21612\Main.java:26: 需要为 class、interface 或 enum
if maxh-minh<0.00000001 then begin writeln((minh+maxh)/2:0:6); close(output); halt; end;
^
0_0_4475942_21612\Main.java:26: 需要为 class、interface 或 enum
if maxh-minh<0.00000001 then begin writeln((minh+maxh)/2:0:6); close(output); halt; end;
^
0_0_4475942_21612\Main.java:27: 需要为 class、interface 或 enum
tmph:=(minh+maxh)/2;
^
0_0_4475942_21612\Main.java:28: 需要为 class、interface 或 enum
sdtr:=(dtr*tmph)/h;
^
0_0_4475942_21612\Main.java:29: 需要为 class、interface 或 enum
tmpr:=r1+sdtr;
^
0_0_4475942_21612\Main.java:30: 需要为 class、interface 或 enum
tmpv:=1/3*(allh+tmph)*pi*tmpr*tmpr-1/3*(allh)*pi*r1*r1;
^
0_0_4475942_21612\Main.java:31: 需要为 class、interface 或 enum
if tmpv<v then try(tmph,maxh) else try(minh,tmph);
^
0_0_4475942_21612\Main.java:32: 需要为 class、interface 或 enum
end;
^
0_0_4475942_21612\Main.java:34: 需要为 class、interface 或 enum
begin
^
0_0_4475942_21612\Main.java:36: 需要为 class、interface 或 enum
if r1=r2 then
^
0_0_4475942_21612\Main.java:39: 需要为 class、interface 或 enum
close(output);
^
0_0_4475942_21612\Main.java:40: 需要为 class、interface 或 enum
exit;
^
0_0_4475942_21612\Main.java:41: 需要为 class、interface 或 enum
end;
^
0_0_4475942_21612\Main.java:42: 需要为 class、interface 或 enum
try(0,h);
^
0_0_4475942_21612\Main.java:43: 需要为 class、interface 或 enum
end.
^
35 错误
|