作者BirthStone (( >__⊙)-q▄︻═╤═─)
看板Programming
标题Re: [问题] fortran题目
时间Sat Jun 14 23:20:31 2008
dimension A(10,8)
open(5.file='I.dat')
read(*,*)B
read(*,*)C
read(5,*)N
do L=1,N
read(*,*)A(L,K)K=1,M
write(*,*)A(L,K)K=1,M
enddo
T=A(B,K) k=1,M
A(C,K)=A(B,K) K=1,M
DO L=1,N
WRITE(*,*) A(L,K) K=1,M
ENDDO
STOP
END
这是一个矩阵转换的题目...
也是蛮多地方错的
有人可以帮一下吗@@?
--
来相本看看吧 *^__^*
http://www.wretch.cc/album/
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 125.232.131.194