ProgIng - Programación en Ingeniería
Loading...
Searching...
No Matches
Ejemplo022.c
Go to the documentation of this file.
1
#include <stdio.h>
2
3
#define N 100
4
5
int
main
(
int
argc,
char
*argv[])
6
{
7
int
n, i, j, k;
8
float
A[
N
][
N
], b[
N
],
fct
, x[
N
];
9
do
{
10
printf(
"Ingrese el numero de incognitas: "
);
11
scanf(
"%d"
, &n);
12
}
while
(n<3||n>
N
);
13
for
(i=0; i<n; i++)
14
{
15
for
(j=0; j<n; j++)
16
{
17
printf(
"A[%d][%d] = "
, i+1, j+1);
18
scanf(
"%f"
, &(A[i][j]));
19
}
20
printf(
"b[%d] = "
, i+1);
21
scanf(
"%f"
, &b[i]);
22
x[i] = 0;
23
}
24
for
(i=0; i<n; i++)
25
{
26
printf(
"%.2fx1"
, A[i][0]);
27
for
(j=1; j<n; j++)
28
{
29
printf(
"%+.2fx%d"
, A[i][j], j+1);
30
}
31
printf(
"=%.2f\n"
, b[i]);
32
}
33
for
(i=1; i<n; i++)
34
for
(j=i; j<n; j++)
35
{
36
for
(k=0,
fct
=A[j][i-1]/A[i-1][i-1]; k<n; k++)
37
A[j][k]-=(
fct
*A[i-1][k]);
38
b[j]-=(
fct
*b[i-1]);
39
}
40
/*
41
for(i=0; i<n; i++)
42
{
43
for(j=0; j<n; j++)
44
printf("%.2f\t", A[i][j]);
45
printf("%.2f\n", b[i]);
46
}
47
*/
48
for
(i=n-1; i>-1; i--)
49
{
50
x[i] = b[i];
51
for
(j=i+1; j<n; j++)
52
x[i]-=A[i][j]*x[j];
53
x[i]/=A[i][i];
54
}
55
for
(i=0; i<n; i++)
56
printf(
"X[%d] = %f\n"
, i+1, x[i]);
57
return
0;
58
}
N
#define N
Definition
012_aleatorio.c:5
fct
double fct(double x, int n)
Definition
Ejemplo029.c:34
main
int main(void)
Definition
Ejemplo_035.c:15
src
20252
Ejemplo022.c
Generated by
1.16.1