计算方法上机作业（类型齐全）

>> %input 初值 p0，最大迭代步数 N，误差限 Tol

>> %output 近似根 p，迭代次数 k

>> k=1;p0=0;N=200;Tol=10^(-5);

while k<=N

p=(exp(p0)-3)/2;

if abs(p-p0)<Tol break

end

k=k+1;p0=p;

end

disp(p);disp(k)

 !

"

#$!

%&'!'(&

)



)

)!)!

结果：

*++

%,!

,,%/%

%&',,!'(&

)

,,

)

),!

)-!

*++

%input 初值 P0，最大迭代步数 N，误差限 Tol

%output 近似根 P，迭代次数 K