| 查看: 386 | 回复: 1 | |||
[交流]
【求助】FORTRAN 90程序问题2【已解决】 已有1人参与
|
|
PROGRAM rotate INTEGER,DIMENSION(1:3,1:3)::a INTEGER::i,j,temp,m a=RESHAPE((/11,22,33,44,55,66,77,88,99/),(/3,3/)) PRINT'(3I3)',((a(i,j),j=1,3),i=1,3) DO i=1,2 m=4 - i temp=a(m,3) a(m,3)=a(3,i); a(3,i)=a(i,1); a(i,1)=a(1,m) a(1,m)=temp END DO PRINT'(3I3)',((a(i,j),j=1,3),i=1,3) END PROGRAM rotate 此程序为什么第四行是77 88 99 第六行是11 22 33? [ Last edited by jjdg on 2010-4-22 at 21:00 ] |
» 猜你喜欢
全日制(定向)博士
已经有5人回复
假如你的研究生提出不合理要求
已经有10人回复
萌生出自己或许不适合搞科研的想法,现在跑or等等看?
已经有4人回复
Materials Today Chemistry审稿周期
已经有4人回复
参与限项
已经有3人回复
实验室接单子
已经有4人回复
对氯苯硼酸纯化
已经有3人回复
求助:我三月中下旬出站,青基依托单位怎么办?
已经有12人回复
所感
已经有4人回复
要不要辞职读博?
已经有7人回复
» 本主题相关价值贴推荐,对您同样有帮助:
Fortran 编译问题
已经有9人回复
allocate与data共存的问题
已经有14人回复
请教一个fortran小程序编译出错的问题,谢谢
已经有9人回复
【求助】Fortran语言赋值问题?
已经有3人回复
关于MPI并行编程的基本问题
已经有8人回复
有关fortran的一次而问题,希望大家能帮帮忙,谢谢
已经有4人回复
写了一个fortran90的小程序,编译通不过,请大侠帮忙
已经有59人回复
【求助】如何写FORTRAN程序实现求平均最近邻距离
已经有34人回复
【求助】f90子程序怎么编译错误?请大家帮忙,谢谢
已经有3人回复
【求助】Fortran编译目标文件后的链接问题
已经有4人回复
【求助】有很多错误的程序,找不出来了
已经有18人回复
【交流】Fortran语言答疑专帖
已经有157人回复


2楼2010-04-22 19:23:52












回复此楼