program liumohan;
var n,i,j,x,m:longint;
begin
read(n);
  m:=n;
  x:=-1;
  for i:=1 to n do
  begin
  m:=m-1;
  x:=x+2;
  for j:=1 to m do write('*');
  for j:=1 to x do write('@');
  for j:=1 to m do write('*');
  writeln;
   end;
    end.
/**************************************************************
	Problem: 1494
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/