追赶法解线性方程组(C语言版)
C 语言 2010-06-17 20:23:00 阅读6 评论0 字号:大中小
#include
#define N 3
main()
{
double A[N][N]={{4,-1,0},{-1,4,-1},{0,-1,4}},b[N]={2,4,10};
int i;
A[0][1]=A[0][1]/A[0][0];
for(i=1;i
A[i][i+1]=A[i][i+1]/(A[i][i]-A[i][i-1]*A[i-1][i]);
for(i=1;i
A[i][i]=A[i][i]-A[i][i-1]*A[i-1][i];
b[0]=b[0]/A[0][0];
for(i=1;i
b[i]=(b[i]-A[i][i-1]*b[i-1])/A[i][i];
for(i=N-2;i>=0;i--)
b[i]=b[i]-A[i][i+1]*b[i+1];
for(i=0;i
printf("%.6lf ",b[i]);
}
原题:
追赶法解线性方程组(C语言版)
C 语言 2010-06-17 20:23:00 阅读6 评论0 字号:大中小
#include
#define N 3
main()
{
double A[N][N]={{4,-1,0},{-1,4,-1},{0,-1,4}},b[N]={2,4,10};
int i;
A[0][1]=A[0][1]/A[0][0];
for(i=1;i
A[i][i+1]=A[i][i+1]/(A[i][i]-A[i][i-1]*A[i-1][i]);
for(i=1;i
A[i][i]=A[i][i]-A[i][i-1]*A[i-1][i];
b[0]=b[0]/A[0][0];
for(i=1;i
b[i]=(b[i]-A[i][i-1]*b[i-1])/A[i][i];
for(i=N-2;i>=0;i--)
b[i]=b[i]-A[i][i+1]*b[i+1];
for(i=0;i
printf("%.6lf ",b[i]);
}
原题: