Reto: Demostrando lo indemostrable II parte

[roman]

Esta ilusión se basa en que todos nos creemos a pies juntillas que la segunda figura realmente se puede formar.

Aquí les mando una rejilla para que la impriman, corten los pedazos y vean ustedes mismos porqué no es posible la figura B.

Código Delphi [-]
program PrintGrid;

{$APPTYPE CONSOLE}

uses
  Printers;

var
  SquareSize: Integer;
  X, Y: Integer;

begin
  WriteLn('Imprimiendo rejilla...');

  SquareSize := Printer.PageWidth div 10;
  Printer.BeginDoc;

  for X := 1 to 9 do
  begin
    Printer.Canvas.MoveTo(SquareSize*X, SquareSize);
    Printer.Canvas.LineTo(SquareSize*X, 9*SquareSize);
  end;

  for y := 1 to 9 do
  begin
    Printer.Canvas.MoveTo(SquareSize, SquareSize*Y);
    Printer.Canvas.LineTo(9*SquareSize, SquareSize*Y);
  end;

  Printer.EndDoc;
end.

// Saludos