#include<iostream>
#include<iomanip>
using namespace std;
const int N = 25;
int a[N][N];
 
int main(){
	int n,x,y,k;
	cin>>n;
	x=n,y=0,k=0;	//笔初始坐标
	for (int i=1; i<=n; i++){
		while (y+1<=i) a[x][++y]=++k;
		while (x+1<=n) a[++x][y]=++k;
		x=n-i; y=0;	//每次迂回完,重置笔坐标
	}
	for (int i=1; i<=n; i++){
		for (int j=1; j<=n; j++) cout<<setw(4)<<a[i][j];
		cout<<endl;
	}
	return 0;
}