试用计算软件完成下列各题：

　　(1) 已知方程在区间内有一实根，求其近似值(精确到)。

【重复实验】

　　实验代码：

f(x):=x^5-4*x^2+1;
wxplot2d(f(x),[x,-1,2]);

find_root(f(x),x,0,1); 

find_root(f(x),x,-1,0); 

find_root(f(x),x,1,2);

 

fpprintprec:4$
x:makelist(0.1*k, k, 0, 10),numer;
f(x),numer;

 

fpprintprec:4$
x:makelist(0.5+0.01*k, k, 0, 10),numer;
f(x),numer;

 

fpprintprec:4$
x:makelist(0.50+0.001*k, k, 0, 10),numer;
f(x),numer;

　　执行结果：