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