记录编号	14557	评测结果	AAAAA
题目名称	复原几何图形	最终得分	100
用户昵称	.Xmz	是否通过	通过
代码语言	Pascal	运行时间	0.001 s
提交时间	2009-11-02 15:57:35	内存使用	0.12 MiB

program xmz;
var
f1,f2:text;
f:array[0..50,0..50]of boolean;
y:array[0..50,0..50]of boolean;
d:array[1..50]of boolean;
t:array[1..50]of integer;
t1,t2,a,s,n:integer;
procedure dfs(nn:integer);
 var
 i:integer;
 begin
  if (s=n)and(f[nn,1])and(not y[nn,1]) then
   begin
    for i:=1 to n do
    write(f2,t[i],' ');close(f1);close(f2);halt;
   end;

  if s<n then
  for i:=1 to n do
   if (f[nn,i])and(not y[nn,i])and(not d[i]) then
    begin
    y[nn,i]:=true;y[i,nn]:=true;d[i]:=true;
    inc(s);t[s]:=i;
    dfs(i);
    y[nn,i]:=false;y[i,nn]:=false;dec(s);d[i]:=false;
    end;
 end;

begin
 assign(f1,'resume.in');assign(f2,'resume.out');
 reset(f1);rewrite(f2);
 read(f1,n);
 while not eof(f1) do
  begin
   read(f1,t1,t2);
   f[t1,t2]:=true;
   f[t2,t1]:=true;
  end;
 s:=1;t[s]:=1;d[1]:=true;
 dfs(1);
 close(f1);close(f2);
end.