Главная / Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel / Дана подпрограмма subroutine proc(a,b,N,func) interface real function func(x) real x end function func end interface real, intent(in) :: a,b integer, intent(in) :: N write(*,*) func(a+b*N) end subroutine proc Выберите верные вызовы, если real function f(x

Дана подпрограмма subroutine proc(a,b,N,func) interface real function func(x) real x end function func end interface real, intent(in) :: a,b integer, intent(in) :: N write(*,*) func(a+b*N) end subroutine proc Выберите верные вызовы, если real function f(x) real x f=sqrt(x)+cos(x)+(1.0,1.0) end function f real function S(x,y) real x,y S=10000*x*y end function S recursive function fr(x) real x if ((x-1)<0) then fr=1.0 return end if fr=sin(x)+cos(x)+fr(x-1) end function fr

вопрос

Правильный ответ:

call proc(1.0, 2.0, 10, fr)
call proc(5.0, f(6.0), 10, f)
call proc(1.0, 2.0, 10, S)
call proc(S(1.0), S(2.0), 10, f)
Сложность вопроса
76
Сложность курса: Введение в программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel
89
Оценить вопрос
Очень сложно
Сложно
Средне
Легко
Очень легко
Комментарии:
Аноним
Если бы не опубликованные решения - я бы сломался c этими тестами интуит.
08 сен 2016
Аноним
Спасибо за сайт
11 апр 2016
Оставить комментарий
Другие ответы на вопросы из темы программирование интуит.