PROGRAM z_5_71;</br>
var i,j,n:longint;</br>
BEGIN
writeln('vvedite n');</br>
readln(n);</br>
for i:=1 to n do
begin
for j:=1 to n do
write(n-j+2,n-i+2);</br>
writeln;</br>
end;</br>END.