| 查看: 488 | 回复: 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 ] |
» 猜你喜欢
OpenAI又攻克数学难题了,离AI做有机合成还有多远?
已经有12人回复
极限拉扯,如何抉择
已经有13人回复
课题组会帮你通过考核么?
已经有7人回复
入职后第一次管课题组的专利缴费,对账才发现官费比别人多掏了一倍
已经有6人回复
售一区SCI文章T0P,我:8O.551.O54,科目全,可十急
已经有9人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有8人回复
售SCI一区文章,我:8O5.5.1.O5.4,科目全,可伽急
已经有10人回复
售SCI一区T0P文章,我:8.O55.1.O.54,科目全,可十急
已经有9人回复
售SCI一区文章,我:8.O.55.1.O.54,科目齐全,可伽急
已经有7人回复
售SCI文章,我:8O5.5.1.O.54,科目齐全,可+急
已经有10人回复


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










回复此楼