К каким процедурам нельзя применить атрибут pure ?
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
subroutine make(a,b,c) complex, intent(in) :: a,b,c write(*,*) a,b,c end subroutine make
subroutine Create(A,B,N) double precision A character(128) B integer(8) N ...end subroutine Create(Верный ответ)
subroutine INC(a) real :: a ... end subroutine INC(Верный ответ)
real function ST(k) real k ST=sin(k)*cos(k**3) end function ST(Верный ответ)
subroutine Destroy(k) integer, intent(in) :: k integer, parameter :: N=100 real :: A(N)=9.0, B(N)=8.0 ... end subroutine Destroy(Верный ответ)