В головной программе описаны переменныеinteger, pointer :: pk character(32), target :: file logical :: st=.FALSE., flag=.TRUE. complex(16) Z1(10,10,10,10) real sk,sp,R
Какие из них доступны во внутренней функции GetParamVector?complex function GetParamVector(V,N,z1) result(flag) complex(16) V integer(8) N complex(16), optional, intent(out) :: z1 real x,y,ks,kp,st ... end function GetParamVector
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа