作者laa7352 (Laa)
看板Fortran
标题Re: [问题] 怎麽写矩阵= 口 =
时间Thu Nov 5 12:09:07 2009
※ 引述《Flcyndi (阿肥)》之铭言：
: 因为要输入矩阵的资料
: 我翻了FORTRAN 90 还是不太会>///<
: 有没有大大可以给个简单的例子...
: 希望能跑出来的是 EX. 矩阵4*4 A=[ ]
: 要输入的资料为[ ] 内的数值 Orz
: and...怎麽让write出来的东西可以在同一行...= ="
: 怎麽写都是分行 >_< ex. a11 b12 c13 希望能像左边一样让a11 b12 c13 在同一行
: a21 b22 c23
: a31 b32 c33
: 新手到了极致...QQ 先谢谢各位了
简单的例子是吧…
首先你先编辑一个档案叫test.txt
然後把*号包起来的那四行复制贴到档案里
**********
1 5 9 13
2 6 10 14
3 7 11 15
4 8 12 16
**********
照你的矩阵
a11=1 b12=5 c13=9 d14=13
a21=2....
...
程式如下
integer var(4,4) !4x4的二维矩阵
open(11,file='test.txt',form='formatted',status='old')
do j=1,4
read(11,*)var(j,1),var(j,2),var(j,3),var(j,4) !读取
enddo
do j=1,4
write(*,*)var(j,1),var(j,2),var(j,3),var(j,4) !输出到萤幕
enddo
stop
end
--
矩阵(阵列)的读写方式很多种
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 140.137.32.160
1F：推 Flcyndi:感谢这篇XDDD 小弟马上TRY ^^ 11/05 16:40
2F：推 chengninghu:推推!!! 11/06 02:17
3F：推 muto52:推热心教学文！ 12/07 19:59