Главная /
Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel /
Объявлена подпрограмма subroutine GetIndicator(param, var, gr1, gr2, val) logical, intent (out) :: param real, intent (out) :: var(:) integer(1), intent (in) :: gr1 integer(2), intent (out) :: gr2 complex(16), intent (in) :: val ... end subroutine GetIndi
Объявлена подпрограмма subroutine GetIndicator(param, var, gr1, gr2, val)
logical, intent (out) :: param
real, intent (out) :: var(:)
integer(1), intent (in) :: gr1
integer(2), intent (out) :: gr2
complex(16), intent (in) :: val
...
end subroutine GetIndicator
Какие вызовы подпрограммы являются верными, если logical ST(10), dum
real A(100), B(100), C(100)
integer(2) kf1, kf2
complex(16) R(200)
вопрос
Правильный ответ:
call GetIndicator(dum, A(9:55), 100, kf2, (1.0, 9.0))
call GetIndicator(.TRUE., B(10:40), 4, kf1, R(10))
call GetIndicator(ST(5), C(45:95), 100, kf1, R(10))
call GetIndicator(ST(9), C(::2), 0, 0, R(1:10))
call GetIndicator(ST(10), C(1:10), 9, kf2, R(90))
Сложность вопроса
73
Сложность курса: Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
89
Оценить вопрос
Комментарии:
Аноним
Я провалил зачёт, почему я не нашёл этот крутой сайт с ответами по интуит месяц назад
16 сен 2020
Аноним
Большое спасибо за подсказками по intiut'у.
29 ноя 2017
Другие ответы на вопросы из темы программирование интуит.
- # Функция протабулирована на отрезке от до с шагом . Сколько значений функции попадет в область и ?
- # Элементам массива требуется присвоить значения, как показано на рисунке. Какую операцию присваивания следует выбрать?\begin{pmatrix} 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 \\ 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 1 & 0 & 0 & 1 & 0 & 0 & 1 & 0 \\ 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 \\ \end{pmatrix}
- # Что можно сказать о следующих строках удачно скомпилированной программы ? logical ex inquire (file='F:\geom.inf', exist = ex) if (ex) open(1,file='G:\copy.txt', action='write', form='binary') Выберите верные утверждения
- # Укажите верные утверждения. Модульные процедуры
- # Выберите процедуры, которые устанавливают текущий цвет в проекте Standard Graphics