24小时热门版块排行榜    

CyRhmU.jpeg
查看: 394  |  回复: 1
当前主题已经存档。

zyj8119

木虫 (著名写手)

[交流] 【求助】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 ]
回复此楼
好好学习,天天向上。
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

zyj8119

木虫 (著名写手)

解决了,是按照逻辑存储的.。
好好学习,天天向上。
2楼2010-04-21 20:56:34
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 zyj8119 的主题更新
普通表情 高级回复(可上传附件)
信息提示
请填处理意见