В следующем фрагменте программы, какие имена являются процедурами привязанными к типу по имени ? use algebra type (matrix) MTR, MTR1, MTR2 real det ... call MTR.Create(10,10) call MTR.Random() call MTR1.Transpose() det=MTR1.determinant ... MTR=MTR1.CONVERT.MTR2 write(*,*) MTR.value(10,2:10,10) ...

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

• # Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interface contains logical function pnt1(x,y) real x,y pnt1=x+y<1000 end function pnt1 real function pnt2(x,y) real x real y pnt2=x+y end function pnt2 real function pnt3(x,y) real y real x pnt3=x*y+x**y end function pnt3 end module mod_E
• # Напишите имя функции (синтаксис Fortran 95), которая вычисляет выражение , где и векторы - векторы типа complex.
• # Используя процедуры MKL, вычислите произведение , где - квадратная матрица, -вектор. Данные находятся в файле записана по строкам). В ответ введите номер минимального по модулю элемента вектора .
• # Используя процедуры MKL, вычислите произведение , где - треугольная квадратная матрица,-квадратная матрица. Данные находятся в файле и записаны по строкам). В ответ введите целую часть суммы модулей элементов главной диагонали матрицы .
• # Укажите директиву, которая предупреждает о необъявленных переменных