Какие из циклов не подходят для параллелизации с использованием опции компилятора /Qparallel

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

• # Описан модуль, который подключен к головной программе module mod_1 integer, private :: A,B,C private SetA public F, init contains subroutine SetA(X) integer X A=X+1 end subroutine SetA subroutine init() call SetA(500); B=20; C=10 end subroutine integer function F F=A+B+C end function F end module mod_1 Какой результат вернет функция F после вызова процедуры init в головной программе ?
• # Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interface contains real function pnt1(x,y) real x,y pnt1=x+y end function pnt1 real function pnt2(x,y) integer x,y pnt2=x+y 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
• # Чему равна верхняя граница coarray-переменной CF, если caf-программа была скомпилирована для двухъядерного процессора и в настройках проекта указано значение Coarray Images = 64. CoArray-переменная CF, объявлена как type (flow) CF[-4:*]
• # Чему равна нижняя граница первого измерения coarray-переменной CF, если caf-программа скомпилирована для восьмиядерного процессора и в настройках проекта указано значение Coarray Images = 0. CoArray-переменная CF, объявлена как type (cell) CF [2,2:*]
• # Используя процедуры MKL, вычислите произведение , где - прямоугольная матрица,-квадратная матрица. Данные находятся в файле и записаны по строкам). В ответ введите целое значение от суммы элементов матрицы .