matlab进退法-切线法求极值(共4页).docx

7、用进退法求极值：；a=0.5，h=0.5,=0.01。%建立函数f（x）。function y=f(x)if nargin=1 y=x2-10*x-36;endend%建立用进退法求解极值程序。function y=jintui(a,h,e)a=input(enter the value of a:);h=input(enter the value of h:);e=input(enter the value of e:);m=1;n=1;x0=a;x1=x0+h;while abs(x1-x0)e if f(x0)f(x1) x0=x1; x1=x0+h*2m; m=m+1; else x1=x0; x0=x1-h/2n; n=n+1; endend x=(x0+x1)/2;y=f(x);end运行结果如下：enter th