24小时热门版块排行榜    

北京石油化工学院2026年研究生招生接收调剂公告
查看: 504  |  回复: 4
当前主题已经存档。
当前只显示满足指定条件的回帖,点击这里查看本话题的所有回帖

小木虫:)

无虫

[交流] 【求助】请高手帮小虫编一个关于非线性方程组牛顿法的程序(已解决)

各位数值计算的高手,小虫一个朋友让我编一个程序,用牛顿迭代法数值求解一个非线性方程组

一式,((a1-x2)/a1)^2+(x3/b1)^2-1=0
二式,((a1-x2-a)/a2)^2+(x3/b2)^2-1=0
三式,x1+x2=h0
其中x1,x2,x3为未知数,其它字母皆为常数。

由于小虫电脑上还没有安装MATLAB和Fortran,所以调试成了大问题,害怕编错了,还是想向各位求助,能否帮小虫编一个计算这个非线性方程组的程序啊?

[ Last edited by formleaf on 2009-10-28 at 06:54 ]
回复此楼

» 猜你喜欢

霸道做事,厚道做人
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小木虫:)

新虫

求助完毕,thanks everyone
霸道做事,厚道做人
5楼2009-10-28 00:06:37
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
查看全部 5 个回答

haixing2008

禁虫

友情建议:“电脑上没有安装MATLAB和Fortran,所以调试成了大问题”
会吓人的,呵呵!还是安装一下吧。
自己可以先查查书,应该不难的。
编程还是得自己摸索一下,实在不行再问哦,不然学的东西肯定不多的,这是我的自身体会,呵呵
平平淡淡才是真!
2楼2009-10-27 08:26:50
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

小木虫:)

新虫

俺的电脑真的没有装MATLAB,朋友明天就要要了,哪位高手帮小虫调试一下这个程序吧

clear
clc
X=[0.5;0.5;0.5];                           %x1=0.5;x2=0.5;x3=0.5;赋予初值
a1=1;a2=2;a=1;b1=1;b2=3;h0=3;              %赋予常数值
err=1;                                     %赋予err初值
while err>0.2                              %循环条件要求总误差小于0.2
  X0=X;                                    %把X赋给X0
  FD=[0,2*(X0(2)-a1)/(a1*a1),2*X0(3)/b1;0,2*(X0(2)+a-a1)/(a2*a2),2*X0(3)/b2;1,1,0];
  F=[((a1-X0(2))/a1)^2+(X0(3)/b1)^2-1;((a1-X0(2)-a)/a2)^2+(X0(3)/b2)^2-1;X0(1)+X0(2)-h0];
  X=X0-inv(FD)*F;
  err=(X-X0)'*(X-X0);
end
X

不胜感激

[ Last edited by 小木虫 on 2009-10-27 at 22:58 ]
霸道做事,厚道做人
3楼2009-10-27 21:41:52
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zhaocaijunzl

专家顾问

优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!优秀!!有木有!!!

★ ★ ★ ★ ★ ★
小木虫:)(金币+5,VIP+0):呵呵,我刚刚让那个同学自己把这个程序调试完了,不过还是感谢您 10-28 00:05
formleaf(金币+1,VIP+0):谢谢你的热心帮助! 10-28 06:52
我不是高手,刚好我有matlab7,于是就算了一下,
命令行输出的是:

ans =

  1.1111e+009

不知道什么意思。X是个向量啊!
4楼2009-10-28 00:00:32
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
普通表情 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 材料调剂 +7 一样YWY 2026-04-01 7/350 2026-04-01 20:50 by 赖春艳
[考研] 292分,材料与化工,申请调剂 +15 程晴之 2026-04-01 16/800 2026-04-01 20:15 by 赖春艳
[考研] 349求调剂 +6 吃的不少 2026-04-01 6/300 2026-04-01 17:55 by JYD2011
[考研] 材料专硕306英一数二 +7 z1z2z3879 2026-03-31 7/350 2026-04-01 14:50 by ZXlzxl0425
[考研] 330分求调剂 +11 qzenlc 2026-03-29 11/550 2026-04-01 14:32 by chenqifeng666
[考研] 环境工程调剂 +9 hyzzzzzzz. 2026-04-01 9/450 2026-04-01 14:20 by salamander`
[考研] 302求调剂一志愿北航070300,本科郑大化学 +8 圣日耳曼条 2026-04-01 10/500 2026-04-01 14:03 by ZXlzxl0425
[考研] 考研材料工程351分调剂 +5 整个好的 2026-03-31 5/250 2026-04-01 09:36 by topgun2009
[考研] 311(085601)求调剂 +12 liziyeyeye 2026-03-28 13/650 2026-04-01 00:34 by fmesaito
[考研] 289求调剂 +7 BrightLL 2026-03-29 7/350 2026-03-31 22:05 by 544594351
[考研] 江苏苏北高校诚邀调剂同学 +3 zzll406 2026-03-31 3/150 2026-03-31 16:54 by 及时行乐fan
[考研] 085601 329分调剂 +6 yzsa12 2026-03-31 6/300 2026-03-31 15:23 by yanflower7133
[考研] 272求调剂,接受跨专业调剂! +3 闲鱼卢 2026-03-31 3/150 2026-03-31 13:00 by 替代品000
[考研] 调剂求院校招收 +7 鹤鲸鸽 2026-03-28 7/350 2026-03-31 11:21 by oooqiao
[考研] 08工科,295,接受跨专业调剂 +6 lmnlzy 2026-03-30 6/300 2026-03-31 10:04 by cal0306
[考研] 085600 286分 材料求调剂 +11 麻辣鱿鱼 2026-03-27 12/600 2026-03-30 19:33 by Wang200018
[考研] 322求调剂 +10 宋明欣 2026-03-27 10/500 2026-03-30 18:47 by 544594351
[考研] 调剂考研 +3 王杰一 2026-03-29 3/150 2026-03-29 08:09 by fmesaito
[考研] 265求调剂 +8 小木虫085600 2026-03-27 8/400 2026-03-27 22:16 by 无际的草原
[考研] 266求调剂 +11 阳阳哇塞 2026-03-27 12/600 2026-03-27 17:56 by yu221
信息提示
请填处理意见