| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 300 人关注过本帖
标题:求助!关于用C语言编程解决三对角方程的问题!大家进来帮忙看下吧!
只看楼主 加入收藏
xpjay107
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2012-12-24
结帖率:0
收藏
已结贴  问题点数:20 回复次数:1 
求助!关于用C语言编程解决三对角方程的问题!大家进来帮忙看下吧!
需要用C语言编程,求解一维非稳态问题。实际上就是循环求解一个三对角方程。

但不知道怎么回事,程序运行之后貌似没有求解方程组,结果总是初值。

望各位看看,是程序哪里出了问题。下面是程序。谢谢啦!

#include "stdio.h"
#include "math.h"
#define N 100
void main()
{
    double w[N+1],p[N+1],e[N+1],q[N+1],r[N+1],x[N+1],y[N+1];
    double t;
    int i,j,k,m,n;
    for(n=1;n<=N-1;n++)
    {
        x[n]=50;
        q[n]=179043*x[n];
    }
    for(i=1;i<=1000;i++)
    {
        x[0]=100,x[100]=0,p[0]=1,p[100]=1,e[0]=0,w[100]=0,q[0]=100,q[100]=0;
        for(j=1;j<=N-1;j++)
        {
            w[j]=-81100;
            p[j]=341243;
            e[j]=-81100;
        }

        r[0]=e[0]/p[0];
        y[0]=q[0]/p[0];
        for(k=1;k<=N-1;k++)
        {
          t=p[k]-w[k]*r[k-1];
          r[k]=e[k]/t;
          y[k]=(q[k]-y[k-1]*w[k])/t;
        }
          x[N-1]=y[N-1];
        for(k=N-1;k<=1;k--)
        {
          x[k]=y[k]-r[k]*x[k+1];
          q[k]=179043*x[k];
        }
        for(m=0;m<=N;m++)
        {
            printf("距离上表面%7.4f米,在%7.4f秒时的温度为%7.2f\n",m*0.001,i*0.02,x[m]);
        }
    }
}
搜索更多相关主题的帖子: double include C语言 方程组 
2012-12-24 14:55
梁朝斌
Rank: 4
等 级:业余侠客
帖 子:192
专家分:288
注 册:2012-10-21
收藏
得分:20 
还是不明白什么意思,注释一下啊

菜鸟也疯狂
2012-12-24 18:25
快速回复:求助!关于用C语言编程解决三对角方程的问题!大家进来帮忙看下吧!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018375 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved