//****************************>
//-Victor De la Rocha
//-Algoritmia@groups.msn.com
//-www.myalgorithm.com
//-Jueves 28/OCT/04
//-Programa 8, Practica 10
//-Ciclos Vectores y Matrices
//-Programa que multiplica dos matrices
//****************************>
#include <stdio.h>
#include <conio.h>
//libreria con el prototipo de la funcion rand()
#include <stdlib.h>
void main(){
 //definicion de variables
 int filas,cols,c1,c2,c3,suma;
 int mat1[100][100],mat2[100][100],mat3[100][100];
 randomize();//inicializa el generados de numeros aleatoreos
 clrscr();//limpiamos pantalla
 
 //-------------dimension
 do{filas=rand()%5;}while(filas==0&&filas>=3);//damos numero aleatorio a la dimension del vector
 cols=filas;//les damos el mismo valor para que sea cuadratica
 //-------------
 
 //simulamos la entrada de valores
 printf("filas: %dn",filas);
 printf("columnas: %dnn",cols);
 
 //-------------asignacion
 for(c1=1;c1<=filas;c1++){//ciclamos la asignacion y salida de datos en pantalla
   for(c2=1;c2<=cols;c2++){
     mat2[c1][c2]=rand()%200;//asignamos valores aleatoreos
     mat1[c1][c2]=rand()%200;//asignamos valores aleatoreos
     printf("mat1[%d][%d]= %dn",c1,c2,mat1[c1][c2]);//salida en pantalla
     printf(" mat2[%d][%d]= %dn",c1,c2,mat2[c1][c2]);//salida en pantalla
    }//END cols
   printf("n");
  }//END filas
 //-------------
 
 for(c1=1;c1<cols;c1++){
   for(c2=1;c2<cols;c2++){
     suma=0;
     for(c3=1;c3<cols;c3++){
       suma=suma+(mat1[c3][c1]*mat2[c2][c3]);
      }
     mat3[c1][c2]=suma;
   }
  }
 
 for(c2=1;c2<=cols;c2++){
  for(c1=1;c1<=cols;c1++){
    printf("mat3[%d][%d]=%dn",c2,c1,mat3[c2][c1]);
   }
  }
 
 getch();//esperamos una tecla
}//END void main