Jacobi迭代法

最新推荐文章于 2021-12-25 22:13:52 发布

web小奶精

最新推荐文章于 2021-12-25 22:13:52 发布

阅读量2k

点赞数

CC 4.0 BY-SA版权

分类专栏：计算方法文章标签： C语言 Jacobi迭代法

本文链接：https://blog.youkuaiyun.com/fenger_c/article/details/78704665

计算方法专栏收录该内容

13 篇文章

订阅专栏

本文展示了一个使用迭代法求解线性方程组的C语言程序实例。该程序从文件中读取系数矩阵和常数项，通过迭代逐步逼近方程组的解，并输出每次迭代的结果直至达到精度要求。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

#include <stdio.h>
#define M 3
main()
{
    FILE *f;
    double a[M][M],b[M];
    double x[M]={0,0,0},y[M];
    int i,j,k,n=100;
    f=fopen("a.txt","r");
    for(i=0;i<M;i++)
    {
        for(j=0;j<M;j++)
            fscanf(f,"%lf",&a[i][j]);
        fscanf(f,"%lf",&b[i]);
    }
    fclose(f);
    double s,max,eps=0.001;
    k=1;
    while(k<n)
    {
        for(i=0;i<M;i++)
        {
            s=0;
            for(j=0;j<M;j++)
                if(j-i)
                    s+=a[i][j]*x[j];
                y[i]=(b[i]-s)/a[i][i];
        }
        max=0;
        for(i=0;i<M;i++)
            if(max<fabs(x[i]-y[i]))
               max=fabs(x[i]-y[i]);
        if(max<eps)break;
        printf("k=%d \n",k);
        for(i=0;i<M;i++)
            printf("y[%d]=%lf  \n",i,y[i]);
        k++;
        for(i=0;i<M;i++)
            x[i]=y[i];

    }
    if(k==n)
    {
    printf("ERROR!\n");
    return;
    }
    printf("k=%d  \n",k);
    for(i=0;i<M;i++)
        printf("y[%d]=%lf   \n",i,y[i]);
}