斯蒂芬森算法;

代码说明：

数值计算算法：斯蒂芬森算法写的帕斯卡尔要找到一个解决方案，以G（X）= X   给定的初始近似值P0：   输入：初始近似P0;公差TOL;            迭代N 0的最大数目。   输出：近似解p或            该方法失败的消息。