Главная /
Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel /
Объявлена функция complex(8) function Ex(A,V,W,alfa,betta,gamma) real, intent(in) :: A(:,:) complex(8), intent(out) :: V(:,:,:) character(*), intent(in) :: W(:) integer, optional, intent(in) :: alfa real, optional, intent(inout) :: betta complex, optional
Объявлена функция complex(8) function Ex(A,V,W,alfa,betta,gamma)
real, intent(in) :: A(:,:)
complex(8), intent(out) :: V(:,:,:)
character(*), intent(in) :: W(:)
integer, optional, intent(in) :: alfa
real, optional, intent(inout) :: betta
complex, optional, intent(out) :: gamma
...
end function Ex
Какие вызовы функции являются верными, если real M2D(100,100)
complex(8) C1(10,10,10), A(10,10,10), B(10,10,10)
character(128) CH(100)
integer kparam
real sparam
complex zparam
вопрос
Правильный ответ:
write(*,*) Ex(M2D(1:50,1:40), C1(:,:,1:7), CH(1:12), gamma=zparam)
zparam=Ex(M2D(:,1:40:4), C1, CH(1:1), alfa=5, betta=7.0)
zparam=Ex(M2D(:,::2),A,CH(1:10),alfa=9)
write(*,*) Ex(M2D,A+B,CH(1:15),kparam, sparam)
write(*,*) Ex(M2D, B(1:3,:,:), CH(::5), alfa=kparam, gamma=zparam)
Сложность вопроса
66
Сложность курса: Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
89
Оценить вопрос
Комментарии:
Аноним
Какой человек ищет эти ответы по интуит? Это же крайне просто
23 окт 2020
Аноним
Это очень намудрённый тест intuit.
19 апр 2017
Другие ответы на вопросы из темы программирование интуит.
- # Оператор, прерывающий выполнение программы
- # Укажите верное условие попадания в закрашенную область [Большая Картинка]
- # Введите значение подстроки str(1:6) в конце работы фрагмента программы character(5), parameter :: s1="start" character(15) str str=repeat("MOV",5) str(9:13)=s1 str(3:7)=str(10:14)
- # Какой оператор используется для освобождения памяти занимаемой динамическим массивом
- # В операторе read для передачи управления исполняемому оператору при возникновении ошибочной ситуации "достигнут конец файла" используется спецификатор