Даны два типа описанных в модуле gas_dynamics type base complex(8), allocatable :: points(:) logical, allocatable :: errors(:) integer, private :: size end type base type, extends(base) :: baseX character(32) file character(32) name logical stat end type baseX Создайте тип composite, который:

содержит поле типа baseX, в виде динамической переменной

содержит поле типа integer(2), в виде ссылки

содержит поле типа integer(8)

В ответ введите размер в байтах переменной типа composite

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

• # Описан модуль, который подключен к головной программе module mod_1 integer, private :: A,B,C private SetA public F, init contains subroutine SetA(X) integer X A=X+1 end subroutine SetA subroutine init() call SetA(500); B=20; C=10 end subroutine integer function F F=A+B+C end function F end module mod_1 Какой результат вернет функция F после вызова процедуры init в головной программе ?
• # Какие компоненты входят в состав IMSL ?
• # Используя процедуры MKL, вычислите произведение , где - треугольная квадратная матрица,-квадратная матрица. Данные находятся в файле и записаны по строкам). В ответ введите целую часть суммы модулей элементов главной диагонали матрицы .
• # В каких разделах "Свойства проекта" указывается количество байт отводимых для хранения целых данных по умолчанию?
• # Укажите параметр компиляции, который устанавливает порог для автопараллелизации циклов