資源簡介
該源程序很好的說明了Aitken加速法的整個過程的奧妙

代碼片段和文件信息
//Aitken解方程
#include?
#include?
using?namespace?std;
//定義求迭代函數(shù)的值的函數(shù)
double?iterator_function(?double?argument)
{
?return?argument*argument*argument?-?1;//返回迭代函數(shù)的值
}
//定義解方程的函數(shù)
void?solve_equal()
{
??double?firstroot?=?1.5;//相當于x(k)
??double?firstroot_next;
??double?firstroot_next_next;
??int?count_iterator?=?0;//統(tǒng)計迭代次數(shù)
??double?precision?=?0.00001;?//預(yù)先給定的精度
??int?max_iterator?=?10000;//迭代次數(shù)上限
??int?factor_break?=?0;//用于判斷跳出循環(huán)的因子
??do
??{
???firstroot_next?=?iterator_function(firstroot);//調(diào)用函數(shù)?
???firstroot_next_next?=?iterator_function(firstroot_next);//調(diào)用函數(shù)
???firstroot?=?firstroot_next_next?-?(firstroot_next_next-firstroot_next)*(firstroot_next_next-firstroot_next)/(firstroot_next_next?-2*firstroot_next?+?firstroot);
???count_iterator++;//累加
???//判斷是否達到迭代上限,并給跳出因子賦值
???if(?count_iterator?>?max_iterator)?
?????{
?cout?<“已達到迭代次數(shù)上限,在該區(qū)間內(nèi)部存在符合精度的根或迭代函數(shù)不收斂“?< ?factor_break?=?1;break;}
??}while(fabs(firstroot-firstroot_next_next)>precision);?
??if(0?==?factor_break)//判斷跳出循環(huán)因子
???{
???cout?<“方程x*x*x?-?x-1=0在[12]內(nèi)的根為:“< ????cout?<“迭代次數(shù)為:“<???}
?}
int?main()
{
??solve_equal();//調(diào)用解方程的函數(shù)
??return?0;
}
?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----
?????目錄???????????0??2010-01-10?20:12??Aitken加速法\
?????文件????????1387??2009-12-07?17:50??Aitken加速法\Aitken.cpp
?????文件?????1199104??2010-01-13?14:52??Aitken加速法\Aitken加速法.ncb
?????文件?????????895??2009-12-07?16:56??Aitken加速法\Aitken加速法.sln
?????文件????????8192??2010-01-13?14:52??Aitken加速法\Aitken加速法.suo
?????文件????????3928??2009-12-07?17:01??Aitken加速法\Aitken加速法.vcproj
?????文件????????1409??2010-01-13?14:52??Aitken加速法\Aitken加速法.vcproj.lqx-PC.lqx.user
?????文件????????1427??2009-12-07?18:12??Aitken加速法\Aitken加速法.vcproj.WIN-ER90LEKKVE3.Administrator.user
?????目錄???????????0??2010-01-10?20:12??Aitken加速法\Debug\
?????文件???????41181??2009-12-07?17:50??Aitken加速法\Debug\Aitken.obj
?????文件???????39936??2009-12-07?17:50??Aitken加速法\Debug\Aitken加速法.exe
?????文件?????????663??2009-12-07?17:31??Aitken加速法\Debug\Aitken加速法.exe.em
?????文件?????????728??2009-12-07?17:31??Aitken加速法\Debug\Aitken加速法.exe.em
?????文件?????????621??2009-12-07?17:50??Aitken加速法\Debug\Aitken加速法.exe.intermediate.manifest
?????文件??????404772??2009-12-07?17:50??Aitken加速法\Debug\Aitken加速法.ilk
?????文件??????584704??2009-12-07?17:50??Aitken加速法\Debug\Aitken加速法.pdb
?????文件????????5704??2009-12-07?17:50??Aitken加速法\Debug\BuildLog.htm
?????文件??????????65??2009-12-07?17:50??Aitken加速法\Debug\mt.dep
?????文件??????175104??2009-12-07?17:50??Aitken加速法\Debug\vc90.idb
?????文件??????217088??2009-12-07?17:50??Aitken加速法\Debug\vc90.pdb
評論
共有 條評論