试验61直接法求解线性方程组.ppt_第1页
试验61直接法求解线性方程组.ppt_第2页
试验61直接法求解线性方程组.ppt_第3页
试验61直接法求解线性方程组.ppt_第4页
试验61直接法求解线性方程组.ppt_第5页
已阅读5页,还剩3页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

试验3直接法求解线性方程组 实验内容Guass列主元消去法Doolittle分解追赶法 试验3解线性方程组的直接法 DirectMethodforSolvingLinearSystems 求解 1高斯消元法 GaussianElimination 高斯消元法 Guass列主元消去法步骤 基本步骤1 输入A b TOL2 对于k 1 N2 1选主元P2 2若 P TOL则停止 输出无解信息 否则2 3换行2 4消元3 回代求解4 输出解x include include include include defineN4 defineEPS1e 5 voidGuass doubleA N 1 inti j k 0 I t doublew 0 p b for k 0 kfabs p p A i k I i if fabs p EPS printf thenumberiserror i d k d n i k exit 0 换行 if I k for j 0 j N 1 j b A k j A k j A I j A I j b for i k 1 i N i 行乘数 A i k A i k A k k for j k 1 j N 1 j A i j A i j A i k A k j 输出变换后的矩阵 printf TheMatrix n for i 0 i N i for j 0 j N 1 j printf A d d 8 4f i j A i j printf n if fabs A N 1 N 1 EPS printf thenumberiserrorA f n A N 1 N 1 exit 1 A N 1 N A N 1 N A N 1 N 1 回代求解 for k N 2 k 0 k w 0 for j k 1 j N j w w A k j A j N A k N A k N w A k N A k N A k k 方程组的解 printf theroot n for i 0 i N i printf x d f n i A i N voidmain doubleA N N 1 1 1 2 1

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论