program yanghui(input,output);
var
  x:array[1..10,1..10] of integer;
  i,j:integer;
begin
  x[1,1]:=1;x[2,1]:=1;x[2,2]:=1;
  writeln(1:4);
  writeln(1:4,1:4);
  for i:=3 to 10 do
    begin
      for j:=1 to i do
        begin
          if(j=1) or (j=i)
          then x[i,j]:=1
          else x[i,j]:=x[i-1,j-1]+x[i-1,j];
          write(x[i,j]:4);
        end;
        writeln;
    end;
end.