| 查看: 485 | 回复: 1 | |||
xuhaohang新虫 (初入文坛)
|
[求助]
讲义中关于“求函数f(x)=x^2-5的正根”的程序中有疑惑，望解答 已有1人参与
|
|
疑问在下文中出现在感叹号后： 题目如下：求函数f(x)=x^2-5的正根，容许的误差是10^-6.我们可以知道这个正根在2和3之间（！请问是怎么知道正根在2和3之间的？）。我们可以以x=2为初始猜测值，初始步长为0.5.程序如下： program main implicit none real::x,tolx=1.0E-6,h=0.5,f-old x=2.0 f-old=fnf(x) do while(h>tolx) x=x+h print*,x,sqrt(5.0)-x !请问在此处的“根5-x”是什么意思？ if(f-old*fnf(x)>0)cycle x=x-h h=h/2.0 enddo contains function fnf(x) implicit none real::x real fnf fnf=x*x-5.0 end function fnf end |
回复此楼» 猜你喜欢
应该是93bebmhtak前后十一个字符比较关键
已经有35人回复
-
长年满屏的广告，版主太不责任了。基金也等的急
已经有3人回复
-
filecode
已经有12人回复
-
不应该看fileCode
已经有4人回复
-
FileCode能看出啥？
已经有19人回复
-
2019年青年基金涵评意见，大家看看几个A，几个B?
已经有5人回复
-
职称评审，求友友推荐见刊最快的期刊
已经有4人回复
-
奇怪，两个人的filecode固定段从头到尾一模一样
已经有10人回复
-
综述论文作为代表作会不会影响评审专家的印象分？
已经有13人回复
-
是这周出结果还是下周出结果？
已经有3人回复
zhswee
铁杆木虫 (著名写手)
- 应助: 130 (高中生)
- 金币: 6195.7
- 散金: 400
- 红花: 19
- 帖子: 2416
- 在线: 398.7小时
- 虫号: 2658798
- 注册: 2013-09-16
- 专业: 力学
2楼2014-10-06 18:57:45
