
用Fortran语言编写两个4*4矩阵乘的程序 谢谢!
1个回答
展开全部
IMPLICT NONE
REAL::A(4,4),B(4,4),C(4,4)=0
INTEGER::I,J,K
READ(*,*) A,B ! 输入方式也可改为读文件
DO I= 1,4
DO J=1,4
DO K=1,4
C(I,J)=C(I,J)+A(I,K)*B(K,J)
ENDDO
ENDDO
ENDDO
WRITE(*,*) C
END
REAL::A(4,4),B(4,4),C(4,4)=0
INTEGER::I,J,K
READ(*,*) A,B ! 输入方式也可改为读文件
DO I= 1,4
DO J=1,4
DO K=1,4
C(I,J)=C(I,J)+A(I,K)*B(K,J)
ENDDO
ENDDO
ENDDO
WRITE(*,*) C
END

2022-12-05 广告
图形化编程简单理解为用积木块形式编程,scratch和python也是其中的一种,属于入门级编程,以其简单生动的画面获得无数学生的喜爱,深圳市创客火科技有限公司是一家做教育无人机的公司,旗下有编程无人机,积木无人机及室内外编队,每款飞机含有...
点击进入详情页
本回答由--提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询