Выберите допустимые объявления модульных переменных для данного варианта программы module mod_A implicit none ! здесь следует объявить модульные переменные public init_solver contains subroutine init_solver(val) real val x=val*1.0E-10 end subroutine init_solver end module mod_A PROGRAM prog use mod_A, Anew => A, Bnew => B implicit none Anew = Anew + 1 write(*,*) Bnew+1 call init_solver(-1.0) Anew=Bnew+1 end

Правильный ответ:

• # Объявлен следующий модуль module matrix integer :: A=100, B=200, C=300 integer, private :: S=9 integer, protected :: P=8 private integer :: Q=100, W=200 integer :: N=500 end module matrix Какие из перечисленных модульных переменных могут быть использованы в качестве границ размещаемых массивов в вызывающей головной программе?
• # Объявлен модуль и головная программа module matrix real :: M=1000 real, private :: MP=3000 real, protected :: MT = 5000 integer, public :: S1=50 integer, protected :: S2=70 end module matrix PROGRAM prog use matrix, only : M, MT implicit none integer :: MP=5000 integer :: S1=10, S2=30 ... Какие из вариантов выражений допустимы в головной программе ?
• # Какие функции используются в выражении res=sin(2.0)*cos(2.0) module mod_F contains real function sin(x) sin=sqrt(sqrt(sqrt(x))) end function sin real function cos(x) cos=x**2.0**2.0 end function cos end module mod_F PROGRAM prog use mod_F, only : sin implicit none real res res=sin(2.0)*cos(1.0) end
• # Какой раздел библиотеки Intel ® Math Kernel Library содержит процедуру, которая выполняет решение уравнения Лапласа \dfrac{\partial ^2 T}{\partial x^2} + \dfrac{\partial ^2 T}{\partial y^2} = 0?
• # Укажите директиву, которая указывает сколько байт следует отводить для целого типа по умолчанию