var a:array[0..1000,0..1000] of boolean;
    f,g:text;
    v:array[0..1000] of boolean;
    p:array[0..1000] of longint;
    i,k,m,n,x,y:longint;

procedure afis;
 var i:longint;
 begin
  for i:=1 to n-1 do
   write(g,p[i],' ');
  writeln(g,p[n]);
 end;

procedure back(lv:longint);
 var i:longint;
 begin
  if k<>0 then begin
   if lv=n+1 then begin
    k:=k-1;
    if k=0 then
     afis;
   end
   else
    for i:=1 to n do
     if (v[i]=false) and (a[p[lv-1],i]=false) then begin
      v[i]:=true;
      p[lv]:=i;
      back(lv+1);
      v[i]:=false;
     end;
  end;
 end;

begin
 assign(f,'dusman.in'); reset(f);
 assign(g,'dusman.out'); rewrite(g);
 read(f,n,k,m);
 for i:=1 to m do begin
  read(f,x,y);
  a[x,y]:=true;
  a[y,x]:=true;
 end;
 back(1);
 close(f); close(g);
end.