应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » C/C++ » 【求助】高手看看此段程序
51/1返回列表
查看: 435  |  回复: 5
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看
当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖

zyj8119

木虫 (著名写手)

[交流] 【求助】高手看看此段程序

CODE:
#include "stdio.h"
#include "stdlib.h"
#include "math.h"
int r_chol(mat,n,u,eps)
double *mat,*u,eps;
int n;
{
int i,j,k;
double t;
if((mat==NULL)||(u==NULL))
{
         printf("One of the pointer is NULL\n");
         return(0);
}
for(i=0;i {
         for(j=0;j                  u[i*n+j]=0.0;
}
if(fabs(mat[0]) {
         printf("Failed.\n");
         return(0);
}
u[0]=sqrt(mat[0]);
for(i=1;i {
         for(j=0;j          {
                 t=0.0;
                 for(k=0;k                          t=t+u[i*n+k]*u[j*n+k];
                  u[i*n+j]=(mat[i*n+j]-t)/u[j*n+j];
         }
         t=0.0;
         for(k=0;k          t=t+u[i*n+k]*u[j*n+k];
             t=mat[i*n+i]-t;
                 if(t                  {
                         printf("Failed.\n");
                         return(0);
                 }
                 u[i*n+i]=sqrt(t);
}
return(1);
}

此段代码是一本算法书里面的，但是竟然运行不起来，不知道为什么？
回复此楼

» 猜你喜欢

» 本主题相关价值贴推荐，对您同样有帮助:
好好学习，天天向上。
1楼 2010-08-26 09:20:06
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

stephenliu89

银虫 (小有名气)
main函数呢？楼主好好看看书啊！
赞一下 回复此楼
Email:stephenliu1989@163.com
5楼2010-08-28 13:07:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答

yalefield

金虫 (文坛精英)

老汉一枚
★
zyj8119(金币+5):什么意思？ 2010-08-26 12:46:24
余泽成(金币+1):谢谢参与应助！ 2010-08-26 17:28:30
墓游主函数
编译得目标
链接没头脑
执行万年遥
赞一下(1人) 回复此楼
2楼2010-08-26 10:20:14
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyj8119

木虫 (著名写手)
引用回帖:
Originally posted by yalefield at 2010-08-26 10:20:14:
墓游主函数
编译得目标
链接没头脑
执行万年遥

想问一下仁兄，怎么提高编程能力。
赞一下 回复此楼
好好学习，天天向上。
3楼2010-08-26 12:46:41
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

yalefield

金虫 (文坛精英)

老汉一枚
zyj8119(金币+4):你的意思是没有主程序吗？ 2010-08-26 15:05:13
没有头的苍蝇，怎么能飞？
赞一下 回复此楼
4楼2010-08-26 13:33:42
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 6 个回答
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
信息提示
关闭
请填处理意见
关闭