| 查看: 870 | 回复: 4 | |||
| 当前只显示满足指定条件的回帖，点击这里查看本话题的所有回帖 | |||
astringent铜虫 (著名写手)
|
[交流]
【求助】请教子程序return 已有3人参与
|
||
|
我在主程序那个调用了程序test，子程序test中有一个循环，通过一个条件，把符合条件的i值赋给变量ia，然后将ia的值传回主程序，我现在不知道在子程序test中有几个符合条件的i值，如果像我这样用return，是不是只能得到一个ia值？如果有多个符合条件的ia值，怎样才能将他们都传回主程序？请大家不吝赐教。 program main call test (ia) -- end subroutine test (ia) ia=0 do i=1,1000 if(条件成立) then ia=i if (ia.ne.0) return endif enddo |
回复此楼» 猜你喜欢
梦想
已经有8人回复
-
有多少人是今天查系统知道结果的？
已经有19人回复
-
面上合作单位盖章
已经有9人回复
-
面上函评意见出来了，像什么等级？
已经有17人回复
-
为什么国自然不能直接公布
已经有5人回复
-
学科评审组评审是指会评吗？
已经有4人回复
-
为什么资助数各大高校都创新高，自己申请怎么就这么难
已经有14人回复
-
小白求助 投论文要求的highlights应该如何写
已经有4人回复
-
麻烦专家们看看评委们的意见（F口面上）
已经有12人回复
-
怎么看青基中了没有啊
已经有6人回复
» 本主题相关价值贴推荐，对您同样有帮助:
- 【资源】催化剂制备中浸渍（等体积浸渍）不断改进
已经有151人回复
scatcj
木虫 (小有名气)
- 应助: 2 (幼儿园)
- 金币: 3065.7
- 散金: 1
- 红花: 2
- 帖子: 287
- 在线: 60.3小时
- 虫号: 1136762
- 注册: 2010-11-01
- 性别: GG
- 专业: 理论和计算化学
5楼2010-12-07 23:30:09
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
2楼2010-12-07 07:11:33
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
3楼2010-12-07 15:49:37
snoopyzhao
至尊木虫 (职业作家)
- 程序强帖: 16
- 应助: 157 (高中生)
- 贵宾: 0.02
- 金币: 18844.7
- 红花: 29
- 帖子: 3803
- 在线: 1422.4小时
- 虫号: 183750
- 注册: 2006-02-13
- 专业: 污染生态化学
4楼2010-12-07 16:59:52
20