program hhh;
const n=6; m=6;
var a:array[1..n,1..m] of integer; i,k,b,x,max,t,j:integer;
BEGIN
for j:=1 to m do
for i:=1 to n do
if j mod 2 =1 then a[n-i+1,j]:=(j-1)*n +i
else a[n-i+1,j]:=j*n-i+1;
for i:=1 to n do begin
for j:=1 to m do
write(' ',a[i,j]);
writeln;
end;
end.