| 查看: 1199 | 回复: 9 | |||
astringent铜虫 (著名写手)
|
[交流]
【求助】这样调用子程序可以吗? 已有8人参与
|
|
我在主程序调用子程序test1(a1),然后再子程序test1中调用子程序test2(a1),如下所示: program main ----- integer a1 call test1(a1) if(a1=1) then --- end if end subroutine test1(a1) integer a1 a1=0 call test2(a1) if (a1=1) then ---- return end test1 subroutine test2(a1) integer a1 a1=0 if (条件成立) then a1=1 endif return end |
» 本帖已获得的红花(最新10朵)
» 猜你喜欢
现代”学阀”该如何界定
已经有12人回复
国社科系统bug了,是不是要放榜了?
已经有10人回复
课题组招2027级博士 上海工程技术大学 激光智能制造方向
已经有4人回复
上海工程技术大学 激光智能制造课题组 2027级博士研究生招生
已经有3人回复
上海工程技术大学激光智能制造课题组|2027级博士研究生招生公告
已经有11人回复
申博发邮件
已经有11人回复
我的奶奶
已经有3人回复
» 本主题相关价值贴推荐,对您同样有帮助:
【求助】请教一个赋值的问题【已完结】
已经有3人回复
【求助】在fortran中可以这样写吗【已完结】
已经有2人回复
coolrainbow
木虫 (著名写手)
未来国家冻凉
- 程序强帖: 2
- 应助: 1 (幼儿园)
- 贵宾: 0.1
- 金币: 3979.5
- 散金: 10
- 红花: 50
- 帖子: 1137
- 在线: 272.3小时
- 虫号: 239560
- 注册: 2006-04-07
- 性别: GG
- 专业: 理论和计算化学

2楼2010-11-16 11:17:38
astringent
铜虫 (著名写手)
- 应助: 16 (小学生)
- 金币: 2210.7
- 散金: 1233
- 红花: 4
- 帖子: 1180
- 在线: 354.8小时
- 虫号: 900839
- 注册: 2009-11-12
- 专业: 理论和计算化学
3楼2010-11-17 00:18:04
4楼2010-11-17 01:50:36
coolrainbow
木虫 (著名写手)
未来国家冻凉
- 程序强帖: 2
- 应助: 1 (幼儿园)
- 贵宾: 0.1
- 金币: 3979.5
- 散金: 10
- 红花: 50
- 帖子: 1137
- 在线: 272.3小时
- 虫号: 239560
- 注册: 2006-04-07
- 性别: GG
- 专业: 理论和计算化学

5楼2010-11-17 08:20:21

6楼2010-11-20 20:34:53
|
本帖内容被屏蔽 |
7楼2010-11-21 10:34:40
Jeydragon
木虫 (正式写手)
- 应助: 5 (幼儿园)
- 金币: 4607.2
- 散金: 268
- 红花: 11
- 帖子: 993
- 在线: 229.6小时
- 虫号: 966560
- 注册: 2010-03-10
- 专业: 大地测量学

8楼2010-12-19 22:13:51
9楼2011-11-27 15:52:17
10楼2011-11-28 21:53:29










回复此楼
a449044676