CS计算机代考程序代写 f=@(c) (50/c)*(1-exp(-9*c/5))-10;

f=@(c) (50/c)*(1-exp(-9*c/5))-10;
g=@(x) exp(x)-10*x;

root1=SecantMethod(f,4)
root2=SecantMethod(g,5)

function cr=SecantMethod(func,ci)
cim1=ci-1
fi=func(ci);
while abs(fi)>1.0e-6
fi=func(ci);
fim1=func(cim1);
cip1=ci-(ci-cim1)*fi/(fi-fim1);
cim1=ci;
ci=cip1;
end
cr=cip1;
end