Random implementado en una matriz estatica

[[Héctor Randolph]]

Ya tienes la respuesta, llena la matriz con los números por parejas. Digamos que llenas la matriz dentro de una sentencia FOR que tendrá n / 2 ciclos, donde n es el número de elementos de la matriz que siempre deberá ser par.

Tomando tu ejemplo la matriz quedaría de esta forma:

1 1 2
2 3 3

Ahora los mezclas en otro ciclo con x repeticiones.

Aquí la idea es tomar dos elementos de la matriz de forma aleatoria digamos [1,1] y [2,2], los intercambias quedando así.


3 1 2
2 1 3

Si esto lo repites muchas veces todos los elementos quedarán en posiciones aleatorias (revueltos).

Saludos

[Jusar]

Hasta el momento lo que tengo es esto codigo pero no logro eso siempre me puede generar o tres 1 o tres 0 o cuatros 1 o 0...

Código Delphi [-]
void __fastcall TForm1::Button1Click(TObject *Sender)
{
     int mat[2][2];
     for (int i=0;i<2;i++)
         for (int j=0;j<2;j++)
             mat[i][j]= 0;

     int w=0;
     for (int i=0;i<2;i++)
     {
         for (int j=0;j<2;j++)
         {
             int x = random(2);
             for (int a=0;a<2;a++)
             {
                 for (int b=0;b<2;b++)
                 {
                     if ( mat[a][b] == x)
                        w++;
                 }
             }
             if (w<2)
             {
                mat[i][j]=x;
                w=0;
             }
         }
     }

     Label1->Caption=mat[0][0];
     Label2->Caption=mat[0][1];
     Label3->Caption=mat[1][0];
     Label4->Caption=mat[1][1];

}

[ecfisa]

Hola Jusar.

Primero que nada felicito a Hector por su poder de interpretación

Entonces, más o menos sería:

const MAXFIL = 2;
const MAXCOL = MAXFIL+1;

int Matriz[MAXFIL][MAXCOL];

void Cargar(int (*m)[MAXCOL])
{
  for(int f=0; f < MAXFIL; f++)
   for(int c=0; c < MAXCOL; c++) {
      m[c][f] = c+1;
      m[c][f+1] = c+2;
    }
}

void Mezclar(int (*m)[MAXCOL])
{
TSmallPoint a,b;
int tmp;
  for (int i=0; i < 100; i++) {
    a.x = random(MAXCOL);
    b.x = random(MAXCOL);
    a.y = random(MAXFIL);
    b.y = random(MAXFIL);
    tmp = Matriz[a.x][a.y];
    m[a.x][a.y] = m[b.x][b.y];
    m[b.x][b.y] = tmp;
  }
}

void Mostrar(TMemo *M)
{
AnsiString s;
  for(int f=0; f < MAXFIL; f++) {
    s = "";
    for(int c=0; c < MAXCOL; c++)
      s = s + IntToStr(Matriz[c][f])+ ' ';
    M->Lines->Add(s);
  }
}

void __fastcall TForm1::FormCreate(TObject *Sender)
{
 Cargar(Matriz);
 Memo1->Clear();
 Memo1->ScrollBars = ssVertical;
 Memo1->Lines->Add("Estado inicial");
 Memo1->Lines->Add("-----------------");
 Mostrar(Memo1);

}

void __fastcall TForm1::btnShowClick(TObject *Sender)
{
 Mezclar(Matriz);
 Memo1->Lines->Add("-----------------");
 Mostrar(Memo1);
}

Saludos.