国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > C > 正文

C語言解3元1次方程組 用初中學的最基本的聯合消元法

2020-01-26 15:42:41
字體:
來源:轉載
供稿:網友

沒學過線性代數,但是很多算法都和矩陣相關,所以就硬著頭皮學。
最近就想自己能不能先寫個算線性方程組的程序呢?后來就想了這么個方法,暫時只能算3元的,任意元的接下來繼續想。有太多硬編碼,希望有興趣的讀者可以給點修改建議!

復制代碼 代碼如下:

#include "stdafx.h"http://VS2010需要
#include "stdio.h"
#include "stdlib.h"
#include "math.h"
double x[3];//存放解x,y,z,使用數組便于輸出
//x=1,y=2,z=3
//double A[3][4]=
//{
// 1,1,1,-6,
// 1,1,-1,0,
// 1,-1,1,-2
//};
//x=2,y=5,z=10
double A[3][4]=
{
 1,2,3,-42,
 2,-1,5,-49,
 -1,3,-3,17
};

//A的第一個方程分別與2、3個方程聯合消去z,得到x,y的兩個方程,存入B
double B[2][4];
//B的兩個方程聯合消去y,得到x
double C[1][4];


void CombineB(int i)//A[0]與A[1]或A[2]消去z
{

 double m0=abs(A[i][2]);
 int b=A[0][2]*A[i][2]>0?-1:1;
 double mi=b*abs(A[0][2]);
 //printf("m0=%lf,mi=%lf/n",m0,mi);//調試用
 for(int j=0;j<4;j++)
 {
  B[i-1][j]=A[0][j]*m0+A[i][j]*mi;
 }


}

void CombineC()//B[0]與B[1]消去y
{

 double m0=abs(B[1][1]);
 int b=B[0][1]*B[1][1]>0?-1:1;
 double m1=b*abs(B[0][1]);

 for(int j=0;j<4;j++)
 {
  C[0][j]=B[0][j]*m0+B[1][j]*m1;
 }


}
//顯示4個參數
void Show(double N[][4],int d1)
{
 char W[3]={'x','y','z'};

 for(int i=0;i<d1;i++)
 {
  for(int j=0;j<3;j++)
  {
   printf("%lf * %c + ",N[i][j],W[j]);
  }
  printf("%lf = 0/n",N[i][3]);
 }
 printf("/n/n");
}

int _tmain(int argc, _TCHAR* argv[])
{
 Show(A,3);
 CombineB(1);
 CombineB(2);
 Show(B,2);
 CombineC();
 Show(C,1);

 //得到x后則依次算出其他數字
 x[0]=(0-C[0][3])/C[0][0];
 x[1]=(0-B[0][3]-B[0][0]*x[0])/B[0][1];
 x[2]=(0-A[0][3]-A[0][0]*x[0]-A[0][1]*x[1])/A[0][2];
 //輸出結果
 for(int i=0;i<3;i++)
  printf("x[%d]=%lf/t",i,x[i]);
 printf("/n");
 system("pause");
 return 0;
}

2.截圖 

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表

圖片精選

主站蜘蛛池模板: 姜堰市| 文山县| 泾川县| 北碚区| 济南市| 灵丘县| 阿拉尔市| 寻甸| 襄樊市| 玉屏| 若羌县| 夏津县| 天水市| 武汉市| 丹阳市| 即墨市| 鹰潭市| 高安市| 江津市| 新丰县| 深水埗区| 汽车| 天水市| 溆浦县| 富阳市| 呼伦贝尔市| 海丰县| 饶阳县| 玛纳斯县| 惠水县| 陈巴尔虎旗| 仙游县| 昌宁县| 平邑县| 正定县| 怀仁县| 高雄市| 翁牛特旗| 鄂尔多斯市| 武平县| 新龙县|