program kotak

program kotak;
uses
crt;
var i, j: integer;
m: integer;
begin
readln(m);
for i:=1 to m do
begin
for j:=1 to m do
if(i=1) or (i=m) or (j=1) or (j=m)
then write ('*')
else write (' ');
writeln;
end;
readln;
end.