| 查看: 408 | 回复: 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 ] |
回复此楼» 猜你喜欢
一志愿山东大学化学与化工学院材料与化工专硕，360分求调剂
已经有3人回复
-
295求调剂
已经有7人回复
-
312求调剂
已经有5人回复
-
288求调剂 一志愿哈工大 材料与化工
已经有35人回复
-
求老师收留
已经有3人回复
-
化学调剂
已经有7人回复
-
调剂
已经有3人回复
-
315分 085602 求调剂
已经有12人回复
-
271分求调剂学校
已经有6人回复
-
生物学硕341求调剂
已经有3人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 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
