Submatriz dentro de una Matriz (Pedregal - OIA)

[[duilioisola]]

Supongo que la forma más simple es recorrer la matriz "Terreno" buscando espacio suficiente.
Si la matriz "casa" es de 3x2, buscarás desde la primera posicion hasta la longitud del terreno - 3.
for i := 0 to Terreno.Largo - Casa.Largo

Cuando encuentras un lugar sin "peldaño" buscas los 3 siguientes para ver si están vacíos para construir la casa
for j := i to i + Casa.Largo

Si las tres posiciones están limplias, haces lo mismo para las posiciones que ocuparía la casa en las siguientes líneas
for k := l to Casa.Alto
for m := i to i + Casa.Largo

Todo esto sería mejor hacerlo con while para que ni bien encuentres una celda ocupada salgas de la búsqueda y sigas con la siguiente celda.

Si también tienes que buscar la casa en otra orientación, deberías ver primero que no sea simetrica después de girarla (un cuadrado por ejemplo) y repetir la búsqueda

[[duilioisola]]

No lo probé porque no tengo Delphi a mano, pero supongo que es aproximandamente lo que quieres:
Recorre de arriba a abajo y de izquierda a derecha el terreno.
Si encuentra una celda vacía recorre de arriba a abajo y de izquierda a derecha las posiciones que ocuparía la casa.
Si durante la búsqueda encuentra una celda ocupada, avanza la posición, porque estoy seguro de que no entrará.

Código Delphi [-]
const
  LargoTerreno=10;
  AltoTerreno=10;
  LargoCasa=3;
  AltoCasa=2;
var
  Terreno : array[1..LargoTerreno, 1..AltoTerreno] of byte;
  Casa : array[1..LargoCasa, 1..AltoCasa] of byte;
  tx, ty : byte;
  cx, cy : byte;
  CeldaOcupada : boolean;
begin
  // Recorro el terreno con dos whiles;
  // Solo recorro hasta la posicion donde la casa es mas grande que el terreno
  tx := 1;
  ty := 1; 
  while (tx < LargoTerreno) and (LargoTerreno - tx > LargoCasa) do
  begin
    while (ty < AltoTerreno) and (AltoTerreno - ty > AltoCasa) do
    begin
      // Si no está ocupada
      if (Terreno[tx, ty]=0) then
      begin
        // Recorro el terreno que ocuparía la casa buscando espacio
        // Aqui estoy seguro de que la casa entra dentro del terreno
        cx := 1;
        cy := 1; 
        CeldaOcupada := False;
        while (cx < LargoCasa) and (not CeldaOcupada) do
        begin
          while (cy < AltoCasa) and (not CeldaOcupada) do
          begin
            if (Terreno[tx+cx-1, ty+cy-1]=1) then
            begin
              CeldaOcupada := True;
              // Avanzo la posición de búsqueda.
              ty := ty + cy;
            end;
            inc(cy);
          end;
          inc(cx);
          cy := 1;
        end;
        // Si ninguna de las celdas esta ocupada encontré un lugar
        if (not CeldaOcupada) then
          ShowMessage(Format('Lugar encontrado: (%d;%d)', [tx, ty]));
      end;
      inc(ty);
    end;
    inc(tx);
    ty := 1;
  end
end;

[mellomda]

muchisimas gracias duilioisola, mientras esperaba una respuesta me puse a hacerlo y efectivamente lo hice practicamente IGUAL a lo que me decis, pero estaba MAL, jaja, yo lo que hacia era recorrer todo el terreno y verificar si no habia posiciones ocupadas:
1- Si habia: Seguia recorriendo
2- Si no habia: "Recorria solo de izquierda a derecha para verificar que la casa entre (sin que hubiese una posicion ocupada)"

Efectivamente funcionaba (eso me parecia), pero claro, solo con matrices cuadras, ya que era lo mismo recorrer de una u otra forma, pero cuando la matriz no era cuadrada y la casa podia entrar en forma vertical, entonces no andaba. Viendo tu ejercicio, me aclaro la idea a la perfeccion... Le hice algunas modificaciones (sobre todo para adaptarlo a C++), y me anda de lujo

Muchisimas gracias duilioisola, te agradezco por tu tiempo, y no solo era lo que pedia sino mas todavia...