В головной программе описаны переменные character(64), parameter :: NAME = "C:\DATA\FLOW\SWIRL\V1" real, pointer :: p1, p2 real, target :: T(1000) logical flag(10) complex(16) C1, C2
Какие из них доступны во внутренней подпрограмме proc ?subroutine proc(C1, C2, flags) real(4), intent(out) :: C1 complex(16), intent(out) :: C2 character(*), optional, intent(in) :: flags real, pointer :: p1 ... end subroutine proc
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
p1
NAME(Верный ответ)
flag(Верный ответ)
T(Верный ответ)
C2
p2(Верный ответ)
C1