0_0_10613735_26502\Main.java:1: 需要为 class、interface 或 enum
var
^
0_0_10613735_26502\Main.java:3: 需要为 class、interface 或 enum
s,x,y:real;
^
0_0_10613735_26502\Main.java:4: 需要为 class、interface 或 enum
a:array[0..10000]of real;
^
0_0_10613735_26502\Main.java:6: 需要为 class、interface 或 enum
function sum(x:real):boolean;
^
0_0_10613735_26502\Main.java:7: 需要为 class、interface 或 enum
var s,i:longint;
^
0_0_10613735_26502\Main.java:8: 需要为 class、interface 或 enum
begin
^
0_0_10613735_26502\Main.java:10: 需要为 class、interface 或 enum
for i:=1 to n do s:=s+trunc(a[i]/x);
^
0_0_10613735_26502\Main.java:11: 需要为 class、interface 或 enum
if s>=k then exit(true);
^
0_0_10613735_26502\Main.java:12: 需要为 class、interface 或 enum
exit(false);
^
0_0_10613735_26502\Main.java:13: 需要为 class、interface 或 enum
end;
^
0_0_10613735_26502\Main.java:15: 需要为 class、interface 或 enum
begin
^
0_0_10613735_26502\Main.java:17: 需要为 class、interface 或 enum
for i:=1 to n do readln(a[i]);
^
0_0_10613735_26502\Main.java:18: 需要为 class、interface 或 enum
x:=0;y:=10000;
^
0_0_10613735_26502\Main.java:18: 需要为 class、interface 或 enum
x:=0;y:=10000;
^
0_0_10613735_26502\Main.java:19: 需要为 class、interface 或 enum
for i:=1 to 100 do
^
0_0_10613735_26502\Main.java:22: 需要为 class、interface 或 enum
if sum(s) then x:=s
^
0_0_10613735_26502\Main.java:24: 需要为 class、interface 或 enum
end;
^
0_0_10613735_26502\Main.java:25: 需要为 class、interface 或 enum
writeln((trunc(y*100)/100):0:2);
^
0_0_10613735_26502\Main.java:26: 需要为 class、interface 或 enum
end.
|
