close
clear
p0=5.5;
Tol=10^(-10);
N0=10;
stop=0;
i=1;
temp(1,1:3)=[1 p0 1];
while (i<N0 & stop==0)
evaluate
temp(i+1,1:3)=[i+1 p abs(p-p0)];
if temp<Tol
stop=1
end
i=i+1;
p0=p;
end
temp
全站熱搜
留言列表