213412412

uses
  crt;

const
  m = 10;

var
  a: array[1..m, 1..m] of integer;
  i, j: integer;

begin

  for i := 1 to m do
    for j := 1 to m do
      a[i, j] := 0;
  for i := 1 to m do
    a[i, m - i + 1] := 1;

  for i := 1 to m - 1 do
  begin
    a[i, m - i] := 1;
  end;

  for i := 2 to m do
    a[i, m - i + 2] := 1;

  for i := 1 to m do
  begin
    for j := 1 to m do
    begin
      gotoxy(4 * j + 4, 2 * i + 4);
      write(a[i, j]);
    end;
  end;
  writeln;
end.