program rotate;
var s:array[0..21,0..21] of integer;
    n,x,y,i,j,fx,num:integer;

begin
 assign(input,'rotate.in'); reset(input);
 assign(output,'rotate.out'); rewrite(output);
 readln(n);

 fillchar(s,sizeof(s),0);
 for i:=0 to n+1 do
  begin
   s[0,i]:=1;
   s[n+1,i]:=1;
   s[i,0]:=1;
   s[i,n+1]:=1;
  end;
 fx:=1; x:=0; y:=1; i:=1; j:=0; num:=1;
 while num<=n*n do
  begin
   if s[x+i,y+j]=0 then begin x:=x+i; y:=y+j; s[x,y]:=num; inc(num); end
   else
    begin
     inc(fx);
     if fx=5 then fx:=1;
     case fx of
      1:begin i:=1; j:=0; end;
      2:begin i:=0; j:=1; end;
      3:begin i:=-1; j:=0; end;
      4:begin i:=0; j:=-1; end;
     end;
    end;
  end;

 for i:=1 to n do
  begin
   for j:=1 to n do write(s[j,i]:4);
   writeln;
  end;

 close(input); close(output);
end.