Program perm;
var p : array[1..10] of integer;
    b : array[1..10] of boolean;
    fin,fout : text;
    i,n : integer;
Procedure perm(k : integer);
var i : integer;
begin
if k=n then
begin
for i:=1 to n do
write(fout,p[i],' ');
writeln(fout);
end
else
for i:=1 to n do
if b[i] then
begin
b[i]:=false;
p[k+1]:=i;
perm(k+1);
b[i]:=true;
end;
end;






begin
assign(fin,'permutari.in');
reset(fin);
readln(fin,n);
close(fin);
for i:=1 to n do
b[i]:=true;
assign(fout,'permutari.out');
rewrite(fout);
perm(0);
close(fout);
end.