Scribd
Cargar
64 vistas3 páginas

Multiplicación de Matrices en Algoritmo

Este algoritmo multiplica dos matrices. Primero solicita el ingreso del tamaño de las matrices A y B, y las matrices C y D. Luego lee los datos de las matrices A y B, y las matrices C y D. A continuación, crea una matriz resultado Mr del tamaño de A por D. Finalmente, llena la matriz resultado realizando la multiplicación de matrices mediante ciclos anidados que recorren las filas de A, las columnas de D, y la columna común de B y la fila de C.

Cargado por

Andreita Monse
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd
64 vistas3 páginas

Multiplicación de Matrices en Algoritmo

Este algoritmo multiplica dos matrices. Primero solicita el ingreso del tamaño de las matrices A y B, y las matrices C y D. Luego lee los datos de las matrices A y B, y las matrices C y D. A continuación, crea una matriz resultado Mr del tamaño de A por D. Finalmente, llena la matriz resultado realizando la multiplicación de matrices mediante ciclos anidados que recorren las filas de A, las columnas de D, y la columna común de B y la fila de C.

Cargado por

Andreita Monse
Derechos de autor
© © All Rights Reserved
Nos tomamos en serio los derechos de los contenidos. Si sospechas que se trata de tu contenido, reclámalo aquí.
Formatos disponibles
Descarga como DOCX, PDF, TXT o lee en línea desde Scribd

Algoritmo multiplicaciondematrices

Definir A, B, C, D, i, j, k, M1, M2, Mr, VAR1, VAR2 como numero

Escribir "ingrese cantidad de filas y columnas de la 1a matriz";

Escribir "No. de filas :";

Leer A;

Escribir "No. de columnas :";

Leer B;

Dimension M1[A,B] ;

Escribir "ingrese cantidad de filas y columnas de la 2a matriz";

Escribir "No. de filas :";

Leer C;

Escribir "No. de columnas :";

Leer D;

Dimension M2[C,D] ;

si B=C Entonces

Dimension Mr[A,D]

DImension r[A];

Escribir "Ingrese datos de la primera matriz"

Para i <- 1 hasta A hacer

para j <- 1 hasta B hacer

Leer M1[i,j]

FinPara

FinPara

Para i<-1 Hasta A Con Paso 1 Hacer

r(i) = "";

Para j<-1 Hasta B Con Paso 1 Hacer

r(i) <- r(i) + ConvertirATexto(M1(i,j)) + " ";


FinPara

FinPara

Para i<-1 Hasta A Con Paso 1 Hacer

Escribir r(i);

FinPara

Escribir "Ingrese datos de la segunda matriz"

Para i <- 1 hasta C hacer

Para j <- 1 hasta D hacer

Leer M2[i,j]

FinPara

FinPara

Para i<-1 Hasta C Con Paso 1 Hacer

r(i) = "";

Para j<-1 Hasta D Con Paso 1 Hacer

r(i) <- r(i) + ConvertirATexto(M2(i,j)) + " ";

FinPara

FinPara

Para i<-1 Hasta A Con Paso 1 Hacer

Escribir r(i);

FinPara

Para i<-1 hasta A Con Paso 1 Hacer

Para j<-1 hasta D Con Paso 1 Hacer

Mr[i,j] <- 0

Para k<-1 hasta B Con Paso 1 Hacer

Mr[i,j] <- Mr[i,j] + M1[i,k]*M2[k,j]

FinPara

FinPara
FinPara

Escribir "la matriz resultante es" ;

Para i<-1 Hasta A Con Paso 1 Hacer

r(i) = "";

Para j<-1 Hasta D Con Paso 1 Hacer

r(i) <- r(i) + ConvertirATexto(Mr(i,j)) + " ";

FinPara

FinPara

Para i<-1 Hasta A Con Paso 1 Hacer

Escribir r(i);

FinPara

sino

Escribir "No cumple requisitos..."

FinSi

FinAlgoritmo

También podría gustarte