matriz inversa
marco
03 de Enero del 2006
por favor necesito un programa en visual basic para encontrar la matriz inversa de una matriz dada, cualquier aporte sera de gran ayuda, gracias totales.
mvallejos
03 de Enero del 2006
Eso lo puedes hacer sobre una matriz auxiliar
Primero se declara una matriz dinámica y tomas las filas y columnas de la matriz inicial
Dim MatrizAux() as Long
Dim Filas as Integer
Dim Columnas as Integer
Filas = Ubound(Matriz,1)
Columnas = Ubound(Matriz,2)
' Se redimensiona la auxiliar al revés
Redim MatrizAux(Columnas,FIlas)
luego, en un bucle anidado, vas traspasando los datos de una matriz a otra
For i = 0 To Filas -1
For j = 0 To Columnas -1
MatrizAux(j, i ) = Matriz (i, j)
Next j
Next i
Saludos
Primero se declara una matriz dinámica y tomas las filas y columnas de la matriz inicial
Dim MatrizAux() as Long
Dim Filas as Integer
Dim Columnas as Integer
Filas = Ubound(Matriz,1)
Columnas = Ubound(Matriz,2)
' Se redimensiona la auxiliar al revés
Redim MatrizAux(Columnas,FIlas)
luego, en un bucle anidado, vas traspasando los datos de una matriz a otra
For i = 0 To Filas -1
For j = 0 To Columnas -1
MatrizAux(j, i ) = Matriz (i, j)
Next j
Next i
Saludos