program msjkfjj;
var a:array[1..50,1..50] of integer;
   j,i,m,n:integer;
begin
  write('m=');readln(m);
  write( 'n=');readln(n);
  if (n=1)and(m=1) then writeln (1)
                    else if (n=2) and (m=1) then writeln(1,' ', 2)
                                            else for i:=1 to n do
                                                      for j:=1 to m do
                                                              if (i=1)and(j=1) then a[i,j]:=1
                                                                               else a[i,j]:=a[i-1,j-1] +a[i-2,j-2];
  for i:=1 to n do
           begin
           for j:=1 to m do
                         write(a[i,j]:5);
           writeln
           end;
end.