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