Главная /
Программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel /
Описан модуль, который подключен к головной программе module mod_1 integer, private :: A=1,B=1,C=1 integer, protected :: 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
Описан модуль, который подключен к головной программе
module mod_1
integer, private :: A=1,B=1,C=1
integer, protected :: 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
end subroutine init_D_E
integer function F
F=A+D+E
end function F
end module mod_1
Какой результат вернет функция F
после вызова процедуры init_D_E(2,3)
в головной программе ?
вопрос
Правильный ответ:
27
Сложность вопроса
53
Сложность курса: Программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
75
Оценить вопрос
Комментарии:
Аноним
Экзамен сдал на 4. Спасибо за ответы
05 июн 2019
Аноним
Зачёт прошёл. Лечу выпивать отмечать сессию интуит
03 фев 2016
Другие ответы на вопросы из темы программирование интуит.
- # Данная программа компилируется с ошибкой. Какие варианты изменений в программе можно выполнить, чтобы из головной программы вызвать процедуру init из модуля A 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() ! вызываем процедуру из модуля A end
- # Напишите имя подпрограммы (синтаксис Fortran 95), которая вычисляет матрично-матричное произведение , где - симметричная матрица, и прямоугольные матрицы, -число.
- # Используя процедуры MKL, вычислите Евклидову норму вектора . Данные находятся в файле data15.txt. В ответ введите целую часть результата.
- # Укажите параметр компиляции означающий максимизацию скорости выполнения
- # Укажите параметр компиляции, который создает приложение не привязанное к конкретному типу процессора