0_0_10513642_25484\Main.java:1: 需要为 class、interface 或 enum
var
^
0_0_10513642_25484\Main.java:3: 需要为 class、interface 或 enum
father,pre,last,edge,dp,b1,b2,d,dis:array[0..20000] of longint;
^
0_0_10513642_25484\Main.java:4: 需要为 class、interface 或 enum
procedure add;
^
0_0_10513642_25484\Main.java:5: 需要为 class、interface 或 enum
begin
^
0_0_10513642_25484\Main.java:6: 需要为 class、interface 或 enum
father[i+1]:=x; pre[i]:=last[x]; last[x]:=i; dis[i]:=y; edge[i]:=i+1;
^
0_0_10513642_25484\Main.java:6: 需要为 class、interface 或 enum
father[i+1]:=x; pre[i]:=last[x]; last[x]:=i; dis[i]:=y; edge[i]:=i+1;
^
0_0_10513642_25484\Main.java:6: 需要为 class、interface 或 enum
father[i+1]:=x; pre[i]:=last[x]; last[x]:=i; dis[i]:=y; edge[i]:=i+1;
^
0_0_10513642_25484\Main.java:6: 需要为 class、interface 或 enum
father[i+1]:=x; pre[i]:=last[x]; last[x]:=i; dis[i]:=y; edge[i]:=i+1;
^
0_0_10513642_25484\Main.java:7: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:9: 需要为 class、interface 或 enum
function max(x,y:longint):longint;
^
0_0_10513642_25484\Main.java:10: 需要为 class、interface 或 enum
begin
^
0_0_10513642_25484\Main.java:12: 需要为 class、interface 或 enum
exit(y);
^
0_0_10513642_25484\Main.java:13: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:16: 需要为 class、interface 或 enum
function dfs1(now,l:longint):longint;
^
0_0_10513642_25484\Main.java:17: 需要为 class、interface 或 enum
var
^
0_0_10513642_25484\Main.java:19: 需要为 class、interface 或 enum
begin
^
0_0_10513642_25484\Main.java:20: 需要为 class、interface 或 enum
t:=last[now]; k:=edge[t];
^
0_0_10513642_25484\Main.java:21: 需要为 class、interface 或 enum
while k<>0 do
^
0_0_10513642_25484\Main.java:24: 需要为 class、interface 或 enum
if b1[now]<ans then begin
^
0_0_10513642_25484\Main.java:26: 需要为 class、interface 或 enum
b1[now]:=ans;
^
0_0_10513642_25484\Main.java:27: 需要为 class、interface 或 enum
d[now]:=k;
^
0_0_10513642_25484\Main.java:28: 需要为 class、interface 或 enum
end
^
0_0_10513642_25484\Main.java:30: 需要为 class、interface 或 enum
t:=pre[t]; k:=edge[t];
^
0_0_10513642_25484\Main.java:30: 需要为 class、interface 或 enum
t:=pre[t]; k:=edge[t];
^
0_0_10513642_25484\Main.java:31: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:32: 需要为 class、interface 或 enum
exit(b1[now]+l);
^
0_0_10513642_25484\Main.java:33: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:35: 需要为 class、interface 或 enum
procedure dfs2(now,l:longint);
^
0_0_10513642_25484\Main.java:36: 需要为 class、interface 或 enum
var
^
0_0_10513642_25484\Main.java:38: 需要为 class、interface 或 enum
begin
^
0_0_10513642_25484\Main.java:39: 需要为 class、interface 或 enum
t:=last[now]; k:=edge[t]; p:=father[now];
^
0_0_10513642_25484\Main.java:39: 需要为 class、interface 或 enum
t:=last[now]; k:=edge[t]; p:=father[now];
^
0_0_10513642_25484\Main.java:40: 需要为 class、interface 或 enum
if now<>1 then
^
0_0_10513642_25484\Main.java:43: 需要为 class、interface 或 enum
while k<>0 do
^
0_0_10513642_25484\Main.java:46: 需要为 class、interface 或 enum
t:=pre[t]; k:=edge[t];
^
0_0_10513642_25484\Main.java:46: 需要为 class、interface 或 enum
t:=pre[t]; k:=edge[t];
^
0_0_10513642_25484\Main.java:47: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:48: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:51: 需要为 class、interface 或 enum
begin
^
0_0_10513642_25484\Main.java:53: 需要为 class、interface 或 enum
for i:=1 to n-1 do
^
0_0_10513642_25484\Main.java:56: 需要为 class、interface 或 enum
add;
^
0_0_10513642_25484\Main.java:57: 需要为 class、interface 或 enum
end;
^
0_0_10513642_25484\Main.java:58: 需要为 class、interface 或 enum
dfs1(1,0);
^
0_0_10513642_25484\Main.java:59: 需要为 class、interface 或 enum
dfs2(1,0);
^
0_0_10513642_25484\Main.java:60: 需要为 class、interface 或 enum
for i:=1 to n do
^
0_0_10513642_25484\Main.java:62: 需要为 class、interface 或 enum
end.
^
46 错误
|
