0_0_10635764_21927\Main.java:1: 需要为 class、interface 或 enum
var
^
0_0_10635764_21927\Main.java:3: 需要为 class、interface 或 enum
pre,edge,last,cost,val:array[0..501] of longint;
^
0_0_10635764_21927\Main.java:4: 需要为 class、interface 或 enum
f:array[0..501] of boolean;
^
0_0_10635764_21927\Main.java:5: 需要为 class、interface 或 enum
dp:array[0..501,0..501] of longint;
^
0_0_10635764_21927\Main.java:6: 需要为 class、interface 或 enum
procedure init;
^
0_0_10635764_21927\Main.java:7: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:9: 需要为 class、interface 或 enum
fillchar(f,sizeof(f),0);
^
0_0_10635764_21927\Main.java:10: 需要为 class、interface 或 enum
fillchar(dp,sizeof(dp),0);
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:11: 需要为 class、interface 或 enum
last:=pre; edge:=pre; num:=0; tl:=0; cost:=pre; val:=pre;
^
0_0_10635764_21927\Main.java:12: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:14: 需要为 class、interface 或 enum
function max(x,y:longint):longint;
^
0_0_10635764_21927\Main.java:15: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:17: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:20: 需要为 class、interface 或 enum
procedure add;
^
0_0_10635764_21927\Main.java:21: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:22: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[u]; last[u]:=num; edge[num]:=v; cost[num]:=w;
^
0_0_10635764_21927\Main.java:22: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[u]; last[u]:=num; edge[num]:=v; cost[num]:=w;
^
0_0_10635764_21927\Main.java:22: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[u]; last[u]:=num; edge[num]:=v; cost[num]:=w;
^
0_0_10635764_21927\Main.java:22: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[u]; last[u]:=num; edge[num]:=v; cost[num]:=w;
^
0_0_10635764_21927\Main.java:23: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[v]; last[v]:=num; edge[num]:=u; cost[num]:=w;
^
0_0_10635764_21927\Main.java:23: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[v]; last[v]:=num; edge[num]:=u; cost[num]:=w;
^
0_0_10635764_21927\Main.java:23: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[v]; last[v]:=num; edge[num]:=u; cost[num]:=w;
^
0_0_10635764_21927\Main.java:23: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[v]; last[v]:=num; edge[num]:=u; cost[num]:=w;
^
0_0_10635764_21927\Main.java:23: 需要为 class、interface 或 enum
inc(num); pre[num]:=last[v]; last[v]:=num; edge[num]:=u; cost[num]:=w;
^
0_0_10635764_21927\Main.java:24: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:26: 需要为 class、interface 或 enum
function dfs(now:longint):boolean;
^
0_0_10635764_21927\Main.java:27: 需要为 class、interface 或 enum
var
^
0_0_10635764_21927\Main.java:29: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:30: 需要为 class、interface 或 enum
if now=n then begin dfs:=true; exit; end;
^
0_0_10635764_21927\Main.java:30: 需要为 class、interface 或 enum
if now=n then begin dfs:=true; exit; end;
^
0_0_10635764_21927\Main.java:31: 需要为 class、interface 或 enum
t:=last[now];
^
0_0_10635764_21927\Main.java:32: 需要为 class、interface 或 enum
while t<>0 do
^
0_0_10635764_21927\Main.java:35: 需要为 class、interface 或 enum
if dfs(k) then begin inc(tl,cost[t]); cost[t]:=0; exit; end;
^
0_0_10635764_21927\Main.java:35: 需要为 class、interface 或 enum
if dfs(k) then begin inc(tl,cost[t]); cost[t]:=0; exit; end;
^
0_0_10635764_21927\Main.java:35: 需要为 class、interface 或 enum
if dfs(k) then begin inc(tl,cost[t]); cost[t]:=0; exit; end;
^
0_0_10635764_21927\Main.java:35: 需要为 class、interface 或 enum
if dfs(k) then begin inc(tl,cost[t]); cost[t]:=0; exit; end;
^
0_0_10635764_21927\Main.java:36: 需要为 class、interface 或 enum
t:=pre[t];
^
0_0_10635764_21927\Main.java:37: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:38: 需要为 class、interface 或 enum
dfs:=false;
^
0_0_10635764_21927\Main.java:39: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:41: 需要为 class、interface 或 enum
procedure tree(now:longint);
^
0_0_10635764_21927\Main.java:42: 需要为 class、interface 或 enum
var
^
0_0_10635764_21927\Main.java:44: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:46: 需要为 class、interface 或 enum
t:=last[now]; f[now]:=true;
^
0_0_10635764_21927\Main.java:46: 需要为 class、interface 或 enum
t:=last[now]; f[now]:=true;
^
0_0_10635764_21927\Main.java:47: 需要为 class、interface 或 enum
while t<>0 do
^
0_0_10635764_21927\Main.java:50: 需要为 class、interface 或 enum
if f[k] then begin t:=pre[t]; continue; end
^
0_0_10635764_21927\Main.java:50: 需要为 class、interface 或 enum
if f[k] then begin t:=pre[t]; continue; end
^
0_0_10635764_21927\Main.java:50: 需要为 class、interface 或 enum
if f[k] then begin t:=pre[t]; continue; end
^
0_0_10635764_21927\Main.java:52: 需要为 class、interface 或 enum
c:=cost[t]*2;
^
0_0_10635764_21927\Main.java:53: 需要为 class、interface 或 enum
for i:=time downto c do
^
0_0_10635764_21927\Main.java:56: 需要为 class、interface 或 enum
t:=pre[t];
^
0_0_10635764_21927\Main.java:57: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:58: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:61: 需要为 class、interface 或 enum
begin
^
0_0_10635764_21927\Main.java:65: 需要为 class、interface 或 enum
readln(n,time);
^
0_0_10635764_21927\Main.java:66: 需要为 class、interface 或 enum
for i:=1 to n-1 do
^
0_0_10635764_21927\Main.java:67: 需要为 class、interface 或 enum
begin readln(u,v,w); add; end;
^
0_0_10635764_21927\Main.java:67: 需要为 class、interface 或 enum
begin readln(u,v,w); add; end;
^
0_0_10635764_21927\Main.java:68: 需要为 class、interface 或 enum
for i:=1 to n do read(val[i]);
^
0_0_10635764_21927\Main.java:69: 需要为 class、interface 或 enum
readln;
^
0_0_10635764_21927\Main.java:70: 需要为 class、interface 或 enum
dfs(1);
^
0_0_10635764_21927\Main.java:71: 需要为 class、interface 或 enum
if tl>time then
^
0_0_10635764_21927\Main.java:73: 未结束的字符字面值
writeln('Human beings die in pursuit of wealth, and birds die in pursuit of food!');
^
0_0_10635764_21927\Main.java:73: 未结束的字符字面值
writeln('Human beings die in pursuit of wealth, and birds die in pursuit of food!');
^
0_0_10635764_21927\Main.java:74: 需要为 class、interface 或 enum
continue;
^
0_0_10635764_21927\Main.java:75: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:76: 需要为 class、interface 或 enum
dec(time,tl);
^
0_0_10635764_21927\Main.java:77: 需要为 class、interface 或 enum
tree(1);
^
0_0_10635764_21927\Main.java:78: 需要为 class、interface 或 enum
writeln(dp[1,time]);
^
0_0_10635764_21927\Main.java:79: 需要为 class、interface 或 enum
end;
^
0_0_10635764_21927\Main.java:80: 需要为 class、interface 或 enum
end.
^
77 错误
|
