| 查看: 403 | 回复: 1 | |||
| 当前主题已经存档。 | |||
[交流]
【求助】FORTRAN 90程序问题【已解决】 已有1人参与
|
|||
|
PROGRAM array_section IMPLICIT NONE INTEGER,DIMENSION(3,4)::p INTEGER,DIMENSION(5)::u=(/3,2,1,4,3/) p=RESHAPE((/1,2,3,4,5,6,7,8,9,10,11,12/),(/3,4/)) PRINT'(5I3)',p(1:3:2,1:4:2) PRINT'(I3)',SIZE(p(u(1:5:4),u(2:5:3))) END PROGRAM array_section 这个程序输出的第一行为什么是 1 3 7 9?? [ Last edited by jjdg on 2010-4-22 at 03:37 ] |
» 猜你喜欢
北京211副教授,35岁,想重新出发,去国外做博后,怎么样?
已经有8人回复
Cas 72-43-5需要30g,定制合成,能接单的留言
已经有7人回复
磺酰氟产物,毕不了业了!
已经有5人回复
论文终于录用啦!满足毕业条件了
已经有25人回复
2026年机械制造与材料应用国际会议 (ICMMMA 2026)
已经有3人回复
自荐读博
已经有3人回复
求助:我三月中下旬出站,青基依托单位怎么办?
已经有5人回复
不自信的我
已经有5人回复
投稿Elsevier的杂志(返修),总是在选择OA和subscription界面被踢皮球
已经有8人回复


2楼2010-04-21 20:56:34









回复此楼