跪求大神们帮忙,用FORTRAN计算子矩阵线。
如果页面字体不规则排列,请各位大神打开附件里的压缩文件,跪谢了!让下面的矩阵A(15,15) 第1行:0.75400.31800.21420.30240.18710.81460.06500.26240.37510.4784 0.07180.35510.98760.35420.7777第2行:0.07660.56800.67530.26240.72230.73560.19390.09560.87600.8937 0.80270.45460.25480.03690.3925行3:0.45950.95550.26420.71420.81880.19300.93000.70770.14330.9851 0.01340.95390.64150.20190.5993行4:0.19520.53350.97920.15070.21950.94470.35940.25800.09670.8004 0.83920.91420.75390.55130.1892第5行:0.51300.09280.26610.40790.88110.24260.90070.84440.43120.1299 0.54660.81510.18170.34330.1248第6行:0.55090.30750.43730.08490.89120.17840.46380.55050.82170.0200 0.90960.85770.70660.23440.3007第7行:0.19990.65410.42910.61810.20380.60430.11610.11520.86630.5654 0.06960.58670.90740.14920.0743第8行:0.21050.39870.79810.49320.86670.27380.07930.95540.24390.1850 0.59780.64450.32730.75020.3131第9行:0.82290.57530.51860.54360.04480.29480.30580.16790.20260.7747 0.66850.11360.67170.95140.0323第10行:0.62730.27680.90610.26460.82420.00550.00480.48450.02200.7470 0.98400.67360.79410.57420.4022行11:0.94610.93100.53540.69850.12290.66960.57750.04300.96020.9198 0.70060.16170.00010.75820.7533第12行:0.26930.50400.35650.49500.85530.03180.01330.36720.04270.0045 0.35080.83210.47710.32660.7360行13:0.44370.62640.50970.72910.61050.13670.14120.46900.71150.4645 0.81840.75150.67420.03650.3628第14行:0.63970.18780.21190.78830.05010.15410.49490.52440.76790.8171 0.99500.90850.55690.31970.5292第15行:0.76470.93030.44070.65080.30740.45320.47110.03320.84160.0492 0.87070.05530.13960.74510.0954 构造矩阵B(9,9)包含了A矩阵里以下的行和列: 行24561011131415列: 3 4789 11121315 写出矩阵B的迹数(矩阵B的主对角线(从左上方至右下方的对角线)上各个元素的总和)保留4位小数点 =========== 矩阵B的迹数 =| | =========== 计算矩阵C = B**9(**表示矩阵的一般强度) 写出矩阵C对角线里元素的整数部分,和矩阵C.的迹数的整数部分。 | c(1,1)| c(2,2)| c(3,3)| c(4,4)| c(5,5)| c(6,6)| c(7,7)| c(8,8)| c(9,9)|
=========== 矩阵C 的迹数=|| ===========
这是作业贴,论坛不解决作业贴 什么叫矩阵的一般强度? 珊瑚虫 发表于 2014-11-6 08:51
这是作业贴,论坛不解决作业贴
:-(:-(:-(:-(:-(:-(:-(:-(:-(:-( 楚香饭 发表于 2014-11-6 08:55
什么叫矩阵的一般强度?
这个可以忽略,其实,就是说C是从B的9次方里所得到的矩阵。 如果是作业,还是自己独立完成吧。
如果你自己书写的代码无法实现,可以贴上来,我们给你提意见或修改。不主张自己毫无思考的全盘请人代劳。 楚香饭 发表于 2014-11-7 09:42
如果是作业,还是自己独立完成吧。
如果你自己书写的代码无法实现,可以贴上来,我们给你提意见或修改。不 ...program submatriz
parameter(m=15,n=15)
real a(m,n)
OPEN(11,FILE='dato31.txt')
READ(11,*)((x(i,j),i=1,m),j=1,n)
write(*,100)((x(i,j),i=1,m),j=1,n)
CLOSE(11)
100 FORMAT(4F9.2)
end
大神,不知道为什么,老出现ERROR,请问我就单单读取A矩阵是哪出现错误了? 请直接上传数据文件:dato31.txt,而不是写到 word 里。空格都没有了,人都没法读,计算机怎么读啊? 已上传,请查看 你这是一个空白文件。能读出来才怪呢
页:
[1]
2