determinante.cpp

Topics Practices: Programming and Numerical Methods Practice 1: Introduction to C Practice 2

//Calculo de determinantes


#include <iostream.h>
#include <iomanip.h>
#include <math.h>
#define MAX 500

//Funciones ...
double determinante(double m[MAX][MAX], int ord);
double solucion(double a[MAX][MAX], int col);

//Procesos ...
void graficar_matriz(double mg[MAX][MAX], int m, int k);
void LeerMatriz();

//Variables Globales ...
double a[MAX][MAX];
int n;
//---------------------

int main(){

    cout<<"\n\t DETERMINANTE";
    cout<<"\n\t ************\n\n";

    cout<<"\n > Ingrese DIMENCION: ";cin>>n;
    cout<<" > Ingrese '"<<n*n<<"' Coeficientes para 'A':\n\n";

    LeerMatriz();
    graficar_matriz(a,n,n);
    cout<<"\n + Determinante del Sistema |A|: "<<determinante(a, n);

    cout<<"\n\n FIN DEL PROGRAMA\n";
    cout<<" ////////////////\n\n";
    cout<<" Visita: http//algoritmia.blogspot.com ... NewClass PERU...\n";
    cout<<" [e-mail] & [e-mail] ...\n\n\n";

cin>>n;}

double determinante(double m[MAX][MAX], int n){
float det;
int l;

det=m[1][1];

   for(int k=1;k<n;k++){l=k+1;
      for(int i=l;i<=n;i++)
	 		for(int j=l;j<=n;j++)
	    		m[i][j]=(m[k][k]*m[i][j]-m[k][j]*m[i][k])/m[k][k];
       		det=det*m[k+1][k+1];
   }

return det;}

void LeerMatriz(){
   //Ingreso de Datos ...
	for(int i=1;i<=n;i++){
        for(int j=1;j<=n;j++){
        		cout<<" - Ingresa Dato ("<<i<<")("<<j<<"): ";cin>>a[i][j];
        }
	}
}

void graficar_matriz(double mg[MAX][MAX], int m, int k){
cout<<"\n";

 for(int i=1;i<=m;i++){
 	for(int j=1;j<=k;j++){
      cout<<setw(8)<<mg[i][j];
 }cout<<"\n";}

}


/* Desarrollado por [e-mail] || [e-mail] ... Algoritmos Dividelos y venceras ....
visiten: algoritmia.blogspot.com */