用fortran语言编一个矩阵相乘的通用程序 急用

来源:学生作业帮助网 编辑:作业帮 时间:2024/11/06 00:33:52
用fortran语言编一个矩阵相乘的通用程序 急用
xSn0{Xi\, .Pxf8 .B4 ( $(FAѭE{oIT*ҢX;;':nNv4*ǧ0f$2Q|3{;1g,~2bfÃ伏@Uk7d} w P@]y(J 5` FhT.)")$c8 m"`.=.zjQ; D͒.Hgq6 J XTue1ą׈5$Y5*@1}SX\L wֶKw񗻼ݽU- e֊*ز*shu*o벹T=?Mhv9%6IɳxOO0fr|I~0'w3}d%Hzt6t0m'2}~fz}} Gln{Nq

用fortran语言编一个矩阵相乘的通用程序 急用
用fortran语言编一个矩阵相乘的通用程序 急用

用fortran语言编一个矩阵相乘的通用程序 急用
program matrix_multiplication
implicit none
integer::i,j,k
integer,parameter::m=4,n=4,l=4,p=4
integer(kind=8)::a(m,n),b(n,p)
integer(kind=8)::c(m,p)
do i=1,m
do j=1,n
write(*,"('Please input a('i2,i2')')")i,j
read(*,*)a(i,j)
end do
end do
do i=1,n
do j=1,p
write(*,"('Please input b('i2,i2')')")i,j
read(*,*)b(i,j)
end do
end do
do i=1,m
do j=1,p
 c(i,j)=0
 do k=1,n
 c(i,j)=c(i,j)+a(i,k)*b(k,j)
 end do
end do
end do

do i=1,m
do j=1,p
write(*,"(i2)")c(i,j)
end do
end do
end program
俺只是刚刚学,会的不多,这个你需要自己从程序开始,改那个m,n,l,p才可以算你需要的维数的.

用fortran语言编一个矩阵相乘的通用程序 急用 本人为fortran初学者,跪求fortran上矩阵相乘.矩阵求逆的程序,要自己遍的那种. 用Fortran语言编写两个4*4矩阵乘的程序 fortran语言矩阵求逆利用fartran语言做一个套用 子程序 矩阵求逆,谁会,帮帮忙啊! MS是用fortran编的的吗 用matlab语言怎么将一个秩为1的矩阵分解成列向量和行向量相乘形式 c++编一个矩阵类,实现相加,相乘.如果矩阵的大小不知道,该怎么编呢?怎么申请空间呢? pascal的蛇形矩阵,设有一个n*n的矩阵(0<n<50)用pascal语言怎么编? 用c语言设计一个程序.要求写出一个函数,满足两个矩阵相乘,得到第三个矩阵.即输入两个矩阵则可得到这两个矩阵的乘积. 用牛顿切线法解决一个问题(fortran 语言) 求fortran大神帮我编一个Fortran程序计算无理数π的1-100的小数位, 编一个程序,用C++实现矩阵的cholesky分解 c语言二维数组排序给定一个10*10的矩阵a,编一程序实现a[i1][j1] 欧洲的通用语言 巴西的通用语言 一个国家的官方语言和通用语言有什么区别?官方语言、通用语言、国语各是什么意思? 用C语言写一个两个矩阵相乘的函数编写一个m*p阶与p*n阶阵想乘的函数,要求用指针做函数的形参,数组名做为实参,在主函数中任意输入两个m*p与p*m的矩阵,然后调用该函数做矩阵相乘运算,并打 maple软件的使用有没有人会用maple啊?在maple里面,两个矩阵相乘的程序怎么编?抓破头了~最好给我一个解常系数非齐次线性微分方程组的程序代码,