




已阅读5页,还剩5页未读, 继续免费阅读
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
_山西大学计算机与信息技术学院实验报告姓 名小 超 学 号11111111专业班级2013级 计算机科学与技术课程名称计算方法实验指导教师李实验日期2015/11/03成 绩实验名称用列主元高斯-约当法解方程组一、实验目的:用列主元高斯-约当法解线性方程组。式中,为阶非奇异方阵,式阶列向量,并分析选主元的重要性。二、实验内容:解下列方程组 三、实验程序:源代码#include / Hello.cpp : 定义控制台应用程序的入口点。#include stdio.h#include stdlib.h#includemath.hint main() double arr45= 1.1348,3.8326,1.1651,3.4017,9.5342,0.5301,1.7875,2.5330,1.5435,6.3941,3.4129,4.9317,8.7643,1.3142,18.4231,1.2371,4.9998,10.6721,0.0147,16.9237;for(int i=1; i3; i+) /确定第一列列主元if(arr00arri0)for(int j=0; j5; j+) double temp = arr0j;arr0j =arrij;arrij = temp;/输出矩阵printf(确定第一列列主元n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/将第一列除第一行外其他值变成0double olda;for(int i= 1; i4; i+) olda = arri0;for(int j=0; j5; j+) arrij=(arrij-(olda/arr00)*arr0j);/输出矩阵printf(n);printf(n);printf(将第一列除第一行外其他值变成0n);for(int i=0; i4; i+) for(int j=0; j-1; j-) arr0j=arr0j/arr00;/输出矩阵printf(n);printf(n);printf(把第一行第一列值变为1n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/确定第二列列主元for(int i=2; i4; i+) if(fabs(arr11)fabs(arri1)for(int j=1; j5; j+) double temp = arr1j;arr1j =arrij;arrij = temp;/输出矩阵printf(n);printf(n);printf(确定第二列列主元n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/把第二列三四行变为0for(int i=2; i0; j-) arrij=arrij-arri1/arr11*arr1j;/输出矩阵printf(n);printf(n);printf(把第二列三四行变为0n);for(int i=0; i4; i+) for(int j=0; j0; j-) arr1j=arr1j/arr11;/输出矩阵printf(n);printf(n);printf(第二行第二列的值变为1n);for(int i=0; i4; i+) for(int j=0; j0; j-) arr0j=arr0j-arr1j*arr01;/输出矩阵printf(n);printf(n);printf(把第一行第二列值变为0n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/确定第三列列主元for(int i=3; i4; i+) if(fabs(arr22)fabs(arri2)for(int j=2; j5; j+) double temp = arr2j;arr2j =arrij;arrij = temp;/输出矩阵printf(n);printf(n);printf(确定第三列列主元n);for(int i=0; i4; i+) for(int j=0; j1; j-) arr3j=arr3j-arr32/arr22*arr2j;/输出矩阵printf(n);printf(n);printf(把第四行第三列的值变为0n);for(int i=0; i4; i+) for(int j=0; j1; j-) arr2j=arr2j/arr22;/输出矩阵printf(n);printf(n);printf(把第三行第三列的值变为1n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/把第一、二行的第三列元素变为0for(int i=0; i1; j-) arrij=arrij-arri2*arr2j;/kk/输出矩阵printf(n);printf(n);printf(把第一、二行的第三列元素变为0n);for(int i=0; i4; i+) for(int j=0; j2; j-) arr3j=arr3j/arr33;/输出矩阵printf(n);printf(n);printf(把第四行第四列的值变为1n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/把第一、二、三行的第四列值变为0for(int i=0; i2; j-) arrij=arrij-arri3*arr3j;/kk/输出矩阵printf(n);printf(n);printf(把第一、二、三行的第四列值变为0n);for(int i=0; i4; i+) for(int j=0; j5; j+) printf(%f,arrij);printf(t);printf(n);/double x1=arr04;double x2=arr14;double x3=arr24;double x4=arr34;printf(x1=%f,x1);printf(n);printf(x2=%f,x2);printf(n);printf(x3=%f,x3);printf(n);printf(x4=%f,x4);while(1);return 0;三、结果分析:虽然两种方法得出的结果均正确,列主元素的计算量稍多,但是
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2025至2030年中国双吊点电动葫芦市场现状分析及前景预测报告
- 2025至2030年中国刀具动平衡机市场现状分析及前景预测报告
- 广播电视台安全用电措施
- 人教版五年级音乐上册个性化教学计划
- 水利工程运行管理单位智慧综合管廊计划
- Toll样受体4激动剂对大鼠心脏重构的影响及机制探究
- 中国电烤铛行业市场深度分析及发展潜力预测报告
- 2023-2029年中国工业计算机(IPC)行业市场全景评估及发展前景预测报告
- 2024年中国高温硫化硅胶行业市场运营态势分析及投资前景预测报告
- 中国票务系统应用行业市场调研及投资战略研究报告
- 西安交通大学大学2024硕士研究生招生考试初试试题703马克思主义哲学
- 监理业务手册范本
- 精神活性物质所致精神障碍病人的护理查房
- 消防工程消防器材供应方案
- 园艺产品营销和管理及控制
- 颅脑外伤影像诊断课件
- 人教版(新起点)小学六年级上册英语教案(全册)
- 医院职业暴露医务人员锐器伤登记表
- 小儿荨麻疹护理查房
- 断裂力学课件
- 国家开放大学《财政与金融(农)》形考任务1-4参考答案
评论
0/150
提交评论