var a,b,i,c,j,k:longint;
begin
read(a);
b:=a-1;
for i:=1 to a do
begin
for j:=b downto 1 do
write(' ');
b:=b-1;
c:=i*2-1;
for k:=1 to c do
write(k);
writeln;
end;
end.
/**************************************************************
	Problem: 1787
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/