type mas=array[1..1000000000] of łnteger;
var n,a,b,d:integer;
c:mas;
VAR ˛:˛NTEGER;
procedure sort1;
var i,j,t:integer;
begin
for i:=1 to l do
for j:=i to l do
if c[i]>c[j] then begin t:=c[i];c[i]:=c[j];c[j]:=t;
end;
end;

procedure sort2(l,r:łnteger);
var j,t,k,K1,K2,x:łnteger;
begłn
łf l<r then begłn x:=c[(l+r) dłv 2];
k1:=0;k2:=0;k:=l;
for j:=l to r do begłn
łf c[k]>x then begłn
t:=c[k];
c[k]:=c[r-k2];
c[r-k2]:=t;
k2:=k2+1;
end else begłn
łf c[k]<x then begłn
t:=c[k];
c[k]:=c[l+k1];
c[l+k1]:=t;
k1:=k1+1;
k:=k+1;
end
 else k:=k+1;
end;
end;
sort2(l,l+k1-1);sort2(r-k2+1,r);
end; 
end; 


begłn
readln(n);
l:=0;
for a:=1 to n do
for b:-1 to n do
for c:=1 to n do
begin
l=l+1;
c[l]:=a+b+c;
l=l+1;
c[l]:=a+b-c;
l=l+1;
c[l]:=a+b*c;
l=l+1;
c[l]:=a-b+c;
l=l+1;
c[l]:=a-b-c;
l=l+1;
c[l]:=a-b*c;
l=l+1;
c[l]:=a*b+c;
l=l+1;
c[l]:=a*b-c;
l=l+1;
c[l]:=a*b*c;
end;
sort1;
SORT2(1,L);

for ˛:=1 to n do wrłte(c[ł]:' );
writeln;
end.