- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
矩阵转逆及弧度角度变换程序
矩阵的逆程序:
#includestdio.h
void main()
{
int N;
printf(输入不超过10的矩阵的阶数N:\n);
scanf(%d,N);
float a[10][10],b[10][20],c[10][10],t;
int i,j,m;
printf(请输入行列式不为0的矩阵A(%d阶):\n,N);
for(i=0;iN;i++)
for(j=0;jN;j++)
scanf(%f,a[i][j]);
for(i=0;iN;i++)
for(j=0;jN;j++)
b[i][j]=a[i][j];
for(i=0;iN;i++)
for(j=N;j2*N;j++)
b[i][j]=0;
for(i=0;iN;i++)
b[i][N+i]=1;
for(m=0;mN;m++)
{
t=b[m][m];
i=m;
while(b[m][m]==0)
{
b[m][m]=b[i+1][m];
i++;
}
if(im)
{
b[i][m]=t;
for(j=0;jm;j++)
{
t=b[m][j];
b[m][j]=b[i][j];
b[i][j]=t;
}
for(j=m+1;j2*N;j++)
{
t=b[m][j];
b[m][j]=b[i][j];
b[i][j]=t;
}
}
for(i=m+1;iN;i++)
for(j=2*N-1;j=m;j--)
b[i][j]-=b[i][m]*b[m][j]/b[m][m];
for(j=2*N-1;j=m;j--)
b[m][j]/=b[m][m];
}
printf(第一步变换后得到的增广矩阵为:\n);
for(i=0;iN;i++)
{
for(j=0;j2*N;j++)
printf(%3.5f ,b[i][j]);
printf(\n);
}
m=N-1;
while(m0)
{
for(i=0;im;i++)
for(j=2*N-1;j=m;j--)
b[i][j]-=b[i][m]*b[m][j];
m--;
}
printf(最后得到的增广矩阵为:\n);
for(i=0;iN;i++)
{
for(j=0;j2*N;j++)
printf(%3.5f ,b[i][j]);
printf(\n);
}
for(i=0;iN;i++)
for(j=0;jN;j++)
c[i][j]=b[i][N+j];
printf(故逆矩阵为:\n);
for(i=0;iN;i++)
{
for(j=0;jN;j++)
printf(%3.5f ,c[i][j]);
printf(\n);
}
}
弧度角度转换程序:
#include math.h
#include iostream
#define PI 3.1415926
//i是起点,j是终点
double Azimuth(double xi,double yi,double xj,double yj)
{
double Dx,Dy,S,T;
Dx=xj-xi;
Dy=yj-yi;
S=sqrt(Dx*Dx+Dy*Dy);
T=asin(Dy/S);
if(Dx0Dy0)
T=T;
else if(Dx0Dy0)
T+=PI/2;
else if(Dx0Dy0)
T=2*PI/3-T;
else
T+=2*PI/3;
return T;
}
using namespace std;
int main()
{
double xi,yi,xj,yj;
coutplease input xi:endl;
cinxi;
coutplease input yi:endl;
cinyi;
coutplease input xj:endl;
cinxj;
coutplease input yj:endl;
cinyj;
double azimuth=Azimuth(xi,yi,x
您可能关注的文档
最近下载
- 爱护我们的人民币.ppt VIP
- GJB9001C:2017质量保证大纲.doc VIP
- 可用性人因设计研究报告 .pdf VIP
- 设计概论讲课课件(第三版杨晓琪).pptx VIP
- 西师版六年级数学教案(上学期)全册教学案.pdf VIP
- 1.1+坚持改革开放(课件)-2025-2026学年九年级道德与法治上册(统编版).pptx VIP
- 2025-2026学年初中数学人教版2024八年级上册-人教版2024教学设计合集.docx
- 征信简版电子版PDF个人信用报告最新版2024年可编辑带水印模板.pdf VIP
- 创新创业基础(高职高专版)PPT教学完整课件.ppt
- 人教版小学六年级数学上册全册教案 -(最全).doc VIP
文档评论(0)