bobchennan 2008-06-02 18:57:00
点我顶贴
收藏
删除
第一个点少于标准输出50%
program p28；
var
i,j,k,n,s1,s2:longint；
a:array[1..10000000] of longint；
begin
readln(n)；
fillchar(a,sizeof(a),0)；
for i:=1 to n-1 do
begin
readln(j,k)；
a[k]:=j；
end；
readln(s1,s2)；
while s1<>s2 do
begin
if a[s1]<>0 then s1:=a[s1]；
if a[s2]<>0 then s2:=a[s2]；
end；
write(s1)；
end.