123

var
        n,i,j:integer;
        a:array [1..1000] of integer;
begin
        readln(n);

        for i:=1 to n div 2 do
                A[i]:=2*i;

        for i:=n div 2 +1 to n do
                A[i]:= A[i-n div 2];

        for i:=1 to n div 2 do
                begin
                        for j:=i to i+n div 2-1 do
                                write(a[j],' ');
                        writeln;
                end;
        readln;

end.