$m=<>;for$i(1..$m*2-1){$i>$m?--$a:++$a;for$j(1..$m*2-1){$b=($j>$m?--$a:++$a)-$m;$_.=$b>0?$b:" "}s/ *$//;print"$_\n";$_="";$a--}