(*参数说明：f为函数，a为区间下界，b为区间上界，e为精度*)(*输出说明：输出为一个列表{a,b,n}，其中[a,b]代表最后求得的解区间，n代表迭代次数*)goldenSearch[f_, a_, b_, e_] := Module[{n = 2, d = b - a, a0 = a, b0 = b},While[d > e,d = Fibonacci[n]/Fibonacci[n +