24小时热门版块排行榜

返回列表

astringent

铜虫 (著名写手)

应助: 16 (小学生)
金币: 2210.7
散金: 1233
红花: 4
帖子: 1180
在线: 354.8小时
虫号: 900839
注册: 2009-11-12
专业: 理论和计算化学

[交流] 【求助】在fortran中可以这样写吗【已完结】已有2人参与

初学fortran，请问可以这样做吗：我在主程序中调用子程序test1，然后又在子程序test1中调用另一个子程序test2,我想传递a1。在子程序test2中，我先定义a1=0，然后有一个判断条件，如果成立，a1就为1，如果条件不成立，a1的值不变。当将a1的值返给子程序test1时，我还是利用a1是不是等于1来进行另一个条件的判断，这样做可以吗？另外我还想问大家，变量必须赋初值才能使用吗？比如说在我的主程序中调用子程序之前都没用到a1，当调用子程序后，才需要a1进行下面的计算，那是不是不用给a1付初值了？
program main
--------
call test1(a1,----)
----
end

subroutine test1(a1,----)
---
call test2(a1---)
--
end subroutine test1

subroutine test3(a1---)
--
end subroutine test3

[ Last edited by nono2009 on 2010-11-17 at 09:50 ]

回复此楼