Напишите имя функции (синтаксис Fortran 95), которая вычисляет скалярное произведение двух вещественных вектор двойной точности.

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

• # Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interface contains real function pnt1(x,y) integer x,y pnt1=x+y end function pnt1 logical function pnt2(x,y) integer x,y pnt2=x+y<1000 end function pnt2 character function pnt3(x,y) real x integer y pnt3=achar(mod(int(x),20)*mod(y,2)) end function pnt3 end module mod_E
• # Финальные процедуры объявляются при помощи атрибута
• # Модуль module mod_1 type region integer x(4) real R end type region type blk logical st(3) character(5), public :: name(2) end type blk type NewType type (region) reg(20) type (blk) bee(30) end type NewType end module mod_1 используется в головной программе. Объявлена переменная type(NewType) NT Укажите верные варианты доступа к полям производного типа.
• # Напишите имя подпрограммы (синтаксис Fortran 95), которая вычисляет матрично-векторное произведение , где -матрица общего вида, и векторы, и числа.
• # Используя процедуры MKL, вычислите Евклидову норму вектора . Данные находятся в файле data14.txt. В ответ введите целую часть результата.