% 秦九韶算法(霍纳法则) % 注释的地方需要修改 clear p=[3,2,1]; % 多项式系数 x0=2; % 求值点 n=length(p); s=p(1); for k=2:n s=x0*s+p(k); end vpa(s,7) % 结果有效数字位数