A=3 b=4. In main program: A=1 b=2. Example:Asimple subroutine to calculate the hypctenuse ... contains. ← subroutine sub2 real :: x x = 1000.0 y = 2000.0.
確定! 回上一頁