| 查看: 451 | 回复: 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 ] |
» 猜你喜欢
国社科通讯评审
已经有6人回复
面上的水很深
已经有21人回复
小木虫没落了,除了祈祷帖子,几乎看不到有价值的帖子
已经有15人回复
5个%2F,非固定段22个字母
已经有9人回复
生命口C13面上会评时间
已经有11人回复
生命口面上会评结束了吗大家有知道结果吗?现在还没有结果正常不?
已经有9人回复
投英文期刊如何查重
已经有6人回复
伯胺上甲基求助
已经有7人回复
跨出版社商投稿
已经有5人回复
生生命学部会评
已经有4人回复


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











回复此楼