Labfans是一个针对大学生、工程师和科研工作者的技术社区。 | 论坛首页 | 联系我们(Contact Us) |
![]() |
![]() |
#1 |
初级会员
注册日期: 2009-06-08
帖子: 3
声望力: 0 ![]() |
![]()
a=1
b=7 while b-a>0.01 a1=a+0.382*(b-a) a2=a+0.618*(b-a) if fun1(a1)<fun1(a2) b=a2 a2=a1 a1=a+0.382*(b-a) else a=a1 a1=a2 a2=a+0.618*(b-a) end x=(b+a)/2 end y=fun1(x) |
![]() |
![]() |