Главная /
Программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel /
Дан модуль, который используется в головной программе module mod_1 type person integer year character(64), private :: name="ABC" character(64), private :: sname="DEF" end type person type, extends (person) :: student logical, private :: status character,
Дан модуль, который используется в головной программе
module mod_1
type person
integer year
character(64), private :: name="ABC"
character(64), private :: sname="DEF"
end type person
type, extends (person) :: student
logical, private :: status
character, public :: group
end type student
end module mod_1
В головной программе объявлена переменная
Правильный ответ:
ps.year
st.person
st.group
st.status
ps.status
Сложность вопроса
78
Сложность курса: Программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
75
Оценить вопрос
Комментарии:
Аноним
Я завалил зачёт, почему я не нашёл этот крутой сайт с решениями с тестами intuit месяц назад
15 июн 2020
Аноним
ответ подошёл
21 апр 2020
Другие ответы на вопросы из темы программирование интуит.
- # Описан модуль, который подключен к головной программе module mod_1 integer, protected :: A=1,B=1,C=1 integer, private :: D, E private SetA public F, init contains subroutine SetA(X) integer X A=X-1 end subroutine SetA subroutine init_D_E(x,y) integer x,y D=X*10; E=Y*2; call SetA(0) end subroutine init_D_E integer function F F=A+D+E end function F end module mod_1 Какой результат вернет функция F после вызова процедуры init_D_E(4,5) в головной программе ?
- # Данная программа компилируется с ошибкой. Какие варианты изменений в программе можно выполнить, чтобы из головной программы вызвать процедуру init из модуля B module mod_A contains subroutine init write(*,*) "Initializing A" end subroutine init end module mod_A module mod_B contains subroutine init write(*,*) "Initializing B" end subroutine init end module mod_B PROGRAM prog use mod_A use mod_B implicit none call init() ! вызываем процедуру из модуля B end
- # Выберите оператор выполняющий барьерную синхронизацию.
- # Используя процедуры MKL, вычислите произведение , где - квадратная матрица, -вектор. Данные находятся в файле записана по строкам). В ответ введите номер минимального по модулю элемента вектора .
- # В каких разделах "Свойства проекта" указывается использование библиотеки Math Kernel Library ?