fortran子程序可不可以调用其它子程序和函数

是的，Fortran子程序可以调用其他子程序和函数。在Fortran中，子程序可以相互调用和嵌套，这使得程序更加模块化和易于维护。

下面是一个示例程序，其中包含一个主程序和两个子程序，其中一个子程序调用了另一个子程序：

PROGRAM MainProgram
  IMPLICIT NONE
  INTEGER :: a, b, c
  a = 10
  b = 20
  ! 调用 AddSubroutine 子程序
  CALL AddSubroutine(a, b, c)
  WRITE(*,*) "The sum of a and b is ", c
END PROGRAM MainProgram

SUBROUTINE AddSubroutine(x, y, z)
  IMPLICIT NONE
  INTEGER, INTENT(IN) :: x, y
  INTEGER, INTENT(OUT) :: z
  ! 调用 MultiplyFunction 函数
  z = x + MultiplyFunction(y)
END SUBROUTINE AddSubroutine

FUNCTION MultiplyFunction(x)
  IMPLICIT NONE
  INTEGER, INTENT(IN) :: x
  INTEGER :: MultiplyFunction
  MultiplyFunction = x * 2
END FUNCTION MultiplyFunction

在上面的示例程序中，主程序调用了一个名为`AddSubroutine`的子程序，该子程序又调用了一个名为`MultiplyFunction`的函数，这两个子程序/函数都可以相互调用和嵌套。