Главная / Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов 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
Оставить комментарий
Другие ответы на вопросы из темы программирование интуит.