FORTRAN两实数矩阵相乘程序
2页!两实数矩阵相乘程序PROGRAM Matrix_multiply!定义动态数组A,B,SREAL,ALLOCATABLE : A(:,:)REAL,ALLOCATABLE : B(:,:)REAL,ALLOCATABLE : S(:,:)!矩阵维数定义INTEGER M,N,L,I,J,KPRINT *,请输入矩阵A的大小,格式M NREAD *,M,NPRINT *,请输入矩阵B的大小,格式N LREAD *,N,LALLOCATE(A(M,N)ALLOCATE(B(N,L)ALLOCATE(S(M,L)!输入A,B矩阵PRINT *,请输入矩阵A,M,行,N,列DO I=1,MPRINT *,请输入第,I,行READ *,A(I,:)ENDDOPRINT *,请输入矩阵B,N,行,L,列DO I=1,NPRINT *,请输入第,I,行READ *,B(I,:)ENDDO!计算A,B相乘DO I=1,MDO J=1,LS(I,J)=0DO K=1,NS(I,J)=S(I,J)+A(I,K)*B(K,J)ENDDOENDDOENDDO!打印输出DO I=1,MPRINT *,S(I,:)ENDDOEND
《FORTRAN两实数矩阵相乘程序》由会员人***分享,可在线阅读,更多相关《FORTRAN两实数矩阵相乘程序》请在金锄头文库上搜索。
材料供应协议书
地下商店设计的规定
加强自身修养演讲稿
安全第一课教案
数学课堂语言魅力
The Carrie Diaries《凯莉日记(2013)》第一季第十一集完整中英文对照剧本.docx
2022年11月贵州水城县招聘卫计系统合同制医务人员(第二批)(一)笔试参考题库(答案解析)
包检员一周工作总结范文
安全管理之班组安全活动要巧新活
液压缸设计规范
数学教师年终工作总结12篇教师工作总结数学
关于下雨天写景作文四篇
对小学数学课堂教学中几个
迎新晚会主持词
会计述职范文合集8篇3
华腾物联网办公大楼能耗监测及节能管控系统
做一个幸福的教师讲座发言稿
信贷申请书共3篇(申请贷款的申请书范文)
医院后勤个人年终总结(4篇).doc
主题班会教案感恩父母主题班会父母恩儿女情
2023-01-07 2页
2023-02-19 15页
2023-11-21 8页
2023-01-21 9页
2024-02-02 7页
2023-04-24 8页
2022-10-27 10页
2023-08-26 79页
2023-05-28 5页
2023-07-26 10页