Fortran Coder

标题: 跪求大神们帮忙，用FORTRAN计算子矩阵线。 [打印本页]

作者: lolita1995 时间: 2014-11-5 23:46
标题: 跪求大神们帮忙，用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矩阵里以下的行和列：

行2 4 5 6 10 11 13 14 15

列: 3 4 7 8 9 11 12 13 15

写出矩阵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 的迹数=| |

===========

矩阵.rar

6.59 KB, 下载次数: 5

作者: 珊瑚虫 时间: 2014-11-6 08:51
这是作业贴，论坛不解决作业贴

作者: 楚香饭 时间: 2014-11-6 08:55
什么叫矩阵的一般强度？

作者: lolita1995 时间: 2014-11-7 09:27

珊瑚虫发表于 2014-11-6 08:51
这是作业贴，论坛不解决作业贴

作者: lolita1995 时间: 2014-11-7 09:28

楚香饭发表于 2014-11-6 08:55
什么叫矩阵的一般强度？

这个可以忽略，其实，就是说C是从B的9次方里所得到的矩阵。

作者: 楚香饭 时间: 2014-11-7 09:42
如果是作业，还是自己独立完成吧。

如果你自己书写的代码无法实现，可以贴上来，我们给你提意见或修改。不主张自己毫无思考的全盘请人代劳。

作者: lolita1995 时间: 2014-11-14 23:59

楚香饭发表于 2014-11-7 09:42
如果是作业，还是自己独立完成吧。

如果你自己书写的代码无法实现，可以贴上来，我们给你提意见或修改。不 ...

[Fortran] 纯文本查看 复制代码

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矩阵是哪出现错误了?

作者: 楚香饭 时间: 2014-11-15 08:35
请直接上传数据文件：dato31.txt，而不是写到 word 里。空格都没有了，人都没法读，计算机怎么读啊？

作者: lolita1995 时间: 2014-11-15 21:29
已上传，请查看

dato31.rar

74 Bytes, 下载次数: 3

作者: 楚香饭 时间: 2014-11-16 08:54
你这是一个空白文件。能读出来才怪呢

作者: lolita1995 时间: 2014-11-18 05:21

楚香饭发表于 2014-11-16 08:54
你这是一个空白文件。能读出来才怪呢

郁闷，我也是迷糊了，弄错文档了，不过我已经做出来了，谢谢大神提点。

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)