Выберите допустимые объявления модульных переменных для данного варианта программы module mod_Aimplicit none! здесь следует объявить модульные переменные public init_solver contains subroutine init_solver(val) real val B=val*A end subroutine init_solverend module mod_APROGRAM prog use mod_A, Anew => A, Xnew => X implicit none Xnew=2.0 write(*,*) B+Anew+Xnew call init_solver(0.0)end
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
integer, public :: B(Верный ответ)
real, public :: X(Верный ответ)
integer, protected :: A(Верный ответ)
integer, private :: B
real, protected :: X