Главная /
Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel /
Объявлена подпрограмма subroutine ModifyMassiv(A,B,st,sp,status) real, intent(in) :: A(:) complex, intent(out) :: B(:,:,:) integer, intent (in) :: st,sp integer, optional, intent(in) :: status ... end subroutine ModifyMassiv Какие вызовы подпрограммы явля
Объявлена подпрограмма subroutine ModifyMassiv(A,B,st,sp,status)
real, intent(in) :: A(:)
complex, intent(out) :: B(:,:,:)
integer, intent (in) :: st,sp
integer, optional, intent(in) :: status
...
end subroutine ModifyMassiv
Какие вызовы подпрограммы являются верными, еслиreal S(1000)
complex Q(100,100,100)
integer ik, k1, jk
вопрос
Правильный ответ:
call ModifyMassiv(S(1:100:2),Q(:,:,::2),k1,int(sum(S)), status=5)
call ModifyMassiv(S(100::2),Q(::2,::2,::2), jk, status=5)
call ModifyMassiv(S,Q(::4,::4,::5), jk+ik+k1, int(sum(Q(:,:,::5))), status=5)
call ModifyMassiv(S,Q,1000,0,0,status=5)
call ModifyMassiv(4*S,3*Q,1000,1110,status=5)
Сложность вопроса
74
Сложность курса: Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
89
Оценить вопрос
Комментарии:
Аноним
Это очень простецкий решебник intuit.
21 авг 2019
Аноним
Если бы не эти решения - я бы сломался c этими тестами интуит.
20 фев 2017
Аноним
спасибо за пятёрку
21 окт 2016
Другие ответы на вопросы из темы программирование интуит.
- # Какие операторы выполняют преобразование массива A(Mi,Mj) (см. рисунок)(Mi=5, Mj=8)? \underbrace{\begin{pmatrix} 0 & 0 & 0 & 0 & 0 & 0 & 0 & 0 \\ 1 & 1 & 1 & 1 & 1 & 1 & 1 & 1 \\ 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 \\ 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 \\ 5 & 5 & 5 & 5 & 5 & 5 & 5 & 5 \\ \end{pmatrix}}_\text{исходный A}\underbrace{\begin{pmatrix} 0 & 2 & 2 & 2 & 2 & 2 & 2 & 0 \\ 1 & 1 & 1 & 1 & 1 & 1 & 1 & 1 \\ 2 & 4 & 4 & 4 & 4 & 4 & 4 & 2 \\ 2 & 2 & 2 & 2 & 2 & 2 & 2 & 2 \\ 5 & 7 & 7 & 7 & 7 & 7 & 7 & 5 \\ \end{pmatrix}}_\text{преобразованный A}
- # Файл data1.txt содержит двоичные данные целочисленного массива A(Mi,Mj,Mk). Данные записаны в формате по умолчанию в следующем порядке Mk, Mi, Mj, A. Найдите сумму элементов матрицы А.
- # Что можно сказать о следующих строках удачно скомпилированной программы ? logical ex inquire (file='F:\geom.inf', exist = ex) if (ex) open(1,file='G:\copy.txt', action='write', form='binary') Выберите верные утверждения
- # Какие из фрагментов программ не содержат рекурсивные вызовы
- # Что означает второй параметр в функции CreatePen