program coba;

{$mode objfpc}{$H+}

uses
  crt;

var
x,j,a, temp : integer;

begin
  write('patokan : ');readln(a);

    if(a<=4) then
    begin

     for x:=1 to a do
     begin
          for j:=1 to a do
          begin

           if (x=1) or (x=a) then
            begin
             write('*');
            end
           else
             if (j=1) or (j=a) then
             write('*') else write(' ');

           end;
          writeln();
     end;


    end
    else
    begin

    for x:=1 to a do
     begin

         for j:=1 to a do
          begin

           if (x=1) or (x=a) then
            begin
             write('*');
            end
           else
             if (j=1) or (j=a) then
              begin
                write('*')
              end
             else write(' ');

           end;
          writeln();
     end;

     //kotak dalam
     a:=a-4;
      temp := a div 2;
      GotoXY( temp+10, temp+10);

     for x:=1 to a do
     begin

          for j:=1 to a do
          begin

           if (x=1) or (x=a) then
            begin
             write('*');
            end
           else
             if (j=1) or (j=a) then
             begin
              write('*');
             end
             else
              begin
               write(' ');
              end
           end;
          writeln();
          //GotoXY( temp+20, temp+20);
     end;


    end;

     readln;
end.