Red de conocimiento informático - Conocimiento sistemático - Resuelva el sistema de ecuaciones Ax=b; utilice el algoritmo de programación en lenguaje C:

Resuelva el sistema de ecuaciones Ax=b; utilice el algoritmo de programación en lenguaje C:

#includelt;stdio.hgt;

flotante A[3][3]={{0.10, 0.07, -0.06},

{0.07, 0.05,-0.03},

{-0.06,-0.03,0.06}}; //Matriz de coeficientes del sistema de ecuaciones lineales tridimensionales

float B[3]={- 0.05 , -0.04, 0.02}; //Término constante de ecuaciones lineales tridimensionales

float X[3]; //Solución de ecuaciones lineales tridimensionales: X1=-0.750, X2=0.000, X3 =-0.417

float DETA ( ) //Cálculo determinante

{

retorno (A[0][0]*A[1][1 ]*A[2][2] A[1][0]*A[2][1]*A[0][2] A[2][0]*A[0]

[1]*A[1][2]

-A[2][0]*A[1][1]*A[0][2]-A[0][0 ]*A[2][1]*A[1][2]-A[1][0]*A[0][1]*A

[2][2]);

}

void swap (int k)//Intercambia el término constante con el coeficiente de la columna k

{

int i;

p>

float t;

for (i=0; ilt; 3; i) {

t=B[i];

B [i]=A[i][k];

A[i][k]=t;

}

}

void Valor de la fórmula

swap (0); //Intercambia el coeficiente de x1 con el término constante

X[0]=DETA()/ d; //Resolver para x1

swap (0); //Restaurar los coeficientes y términos constantes originales

swap (1); //Intercambiar los coeficientes y términos constantes de x2

X[ 1]=DETA()/d; //Resolver x2

swap (1); //Restaurar los coeficientes y constantes originales

swap (2); //Reemplazar Intercambiar los coeficientes y constantes de x3

X[2]=DETA()/d //Resolver x3

swap (2); Restaurar el elemento original de coeficientes y constantes

}

void main()

{

int i;

XYZ ();

for (i=0;ilt;3;i)

printf(".3f\n",X[i]);

}