Ответы к тесту/контрольной: Программирование больших вычислительных задач на современном Фортране с использованием компиляторов Intel

Процедурные указатели объявляются при помощи оператора

Перегрузка процедур объявляется при помощи операторов

Укажите параметр компиляции, который задействует создание кода на базе директив OpenMP

Укажите директиву, которая подключает имя библиотеки в процессе сборки программы

Укажите параметр компиляции устанавливающий размер памяти для типа double precision

Какие компоненты входят в состав IMSL ?

В следующем фрагменте программы, какие имена являются процедурами привязанными к типу по имени ? 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) ...

Укажите оператор, используемый для задания производного типа

Укажите параметр компиляции, который не использует методов оптимизации, увеличивающие размер кода

Укажите параметр компиляции, который позволяет получить информацию для диагностики ошибок в параллельной части параллельного приложения

Выберите оператор выполняющий синхронизацию избранных копий программы

В программе объявлены типы и переменная type point complex x,y end type point type NewType integer a type (point) z(3) character(4) border(2) end type NewType type (NewType) pt(10) Укажите верные варианты инициализации элемента pt(5)

Укажите оператор, который указывает какие процедуры привязаны к типу по имени

Переменные, объявленные как public

Объявлены следующие типы и переменные. type sma real p(100) real mid(100) logical res end type sma type, extends (sma) :: ssma real middle end type ssma type uma type (sma) sm(100) complex p(100) logical ret character bis end type uma class (sma), pointer :: polym type (uma), target :: um1 type (ssma), target :: ssm1 Какие справедливы прикрепления ссылки polym?

Какое количество копий CAF-программы можно создать на двухядерном процессоре ?

Дан модуль, который используется в головной программеmodule mod_1 type rectangle integer x1,y1,x2,y2 integer, private :: color character(16), private :: name = "REC_0001" end type rectangle type, extends (rectangle) :: roundrect integer r1, r2 real center end type roundrectend module mod_1 В головной программе объявлена переменнаяtype (roundrect) rcУкажите верные варианты доступа к полям производного типа из головной программы.

В головной программе используется модуль geom, который содержит только тип figure и модульную процедуру Modify. Головная программа использует модуль geom.В головной программе объявлена переменная class (figure), allocatable :: FG.Укажите верное описание типа figure и процедуры Modify, чтобы при вызове call FG.Modify(10) из головной программы, происходило изменение поля points в переменной FG.

Укажите функцию, которая вычисляет верхнюю границу coarray-переменной

Какой режим компиляции позволяет использовать CoArray

Объявлен следующий модуль module matrix private integer :: A=100, B=200, C=300 complex, private :: S=9 integer, protected :: P=8 integer :: Q=100, W=200 integer, public :: N=500end module matrix Какие из перечисленных модульных переменных могут быть использованыкачестве границ размещаемых массивов в вызывающей головной программе?

Какие функции используются в выражении res=sin(2.0)*cos(2.0) module mod_F contains real function sin(x) sin=sqrt(sqrt(sqrt(x))) end function sin real function cos(x) cos=x**2.0**2.0 end function cosend module mod_FPROGRAM prog use mod_F, only : sin implicit none real res res=sin(2.0)*cos(1.0) end

Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interfacecontains 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 pnt3end module mod_E

Выберите верные утверждения касающиеся конструктора

В головной программе используется модуль flow. Объявлена переменная PT типа point. Какие из процедур в типе point могут изменить приватную часть переменной PT ?module flow type point integer x integer y real, private :: cp contains procedure, nopass :: proc1 procedure proc2 procedure, pass :: proc3 procedure, nopass :: proc4 procedure proc5 procedure show end type point contains subroutine proc1(pt,val) type(point) pt real val pt.cp = val end subroutine proc1 subroutine proc2(pt) class(point) pt pt.cp=real(pt.x+pt.y) end subroutine proc2 subroutine proc3(pt) class(point) pt integer tmp tmp=pt.x; pt.x=pt.y; pt.y=tmp end subroutine proc3 subroutine proc4(pt) type(point) pt if (pt.cp<=0) write(*,*) "ERROR" end subroutine proc4 subroutine proc5(pt,M,N,S) class(point) pt integer M,N real, optional :: S pt.x=pt.x+N pt.y=pt.y+M if (present(S)) call random_number(pt.cp) end subroutine proc5end module flow

Какие функции используются в выражении res=sin(2.0)*cos(2.0) module mod_F contains real function sin(x) sin=sqrt(sqrt(sqrt(x))) end function sin real function cos(x) cos=x**2.0**2.0 end function cosend module mod_FPROGRAM prog use mod_F, only : sin, cos implicit none real res res=sin(2.0)*cos(1.0) end

Укажите параметр компиляции разрешающий округление результатов с плавающей точкой в присваиваниях

Финальные процедуры объявляются при помощи атрибута

Какие компоненты входят в состав MKL ?

Укажите атрибут используемый для инкапсуляции данных модуля

Наследование производных типов осуществляется при помощи атрибута

Укажите функцию, которая позволит определить количество байт памяти отведенное под coarray-переменную?

Укажите директиву, которая задает идентификатор объектного файла

Какой раздел библиотеки Intel ® Math Kernel Library содержит процедуру PARDISO ?

В каком разделе находится описание функции asum ?

В головной программе используется модуль farm, который содержит только тип animal и модульную процедуру PrintTitle. Головная программа использует модуль farm.В головной программе объявлена переменная type (animal) AN.Укажите верное описание типа animal и процедуры PrintTitle, для организации вызова call AN.PrintTitle() из головной программы.

Модульmodule mod_1 type region integer x1,y1,x2,y2 end type region type blk logical st(3) character(5), private :: name end type blk type NewType type (region) reg type (blk) bee end type NewTypeend module mod_1 используется в головной программе.Описан массивtype (NewType) matrix(10,10,100)Укажите верные варианты инициализации элемента matrix(1:5:2,:,20)

Перегрузка операции деления реализуется при помощи оператора

Укажите директиву, которая указывает сколько байт следует отводить для целого типа по умолчанию

В каких разделах "Свойства проекта" указывается количество байт отводимых для хранения целых данных по умолчанию?

Выберите допустимые объявления модульных переменных для данного варианта программы module mod_Aimplicit none! здесь следует объявить модульные переменные public init_solver contains subroutine init_solver(val) real val x=val*sin(val)+A end subroutine init_solverend module mod_APROGRAM prog use mod_A, Anew => A, Bnew => B implicit none Bnew=1+Anew write(*,*) Bnew+Anew+X call init_solver(-1.0)end

Укажите параметр компиляции, который управляет отчетом о возможности векторизации циклов

Переменные, объявленные как protected

Какой раздел библиотеки Intel ® Math Kernel Library содержит генераторы квазислучайных чисел ?

В каком разделе находится описание подпрограммы hemm ?

Выберите оператор выполняющий барьерную синхронизацию.

Дан модуль, который используется в головной программеmodule mod_1 type maps integer x,y integer color logical, private :: status end type maps type, extends (maps) :: e_maps integer segment character, private :: code end type e_mapsend module mod_1 В головной программе объявлена переменнаяtype (e_maps) EMУкажите верные варианты доступа к полям производного типа из головной программы.

Объявлен модуль и головная программа module matrix real, private :: A=1.6 real, public :: B=5.8 real, protected :: C=1.0E+10 private integer :: X=50 integer :: Y=70end module matrixPROGRAM prog use matrix, only : BNEW => B implicit none real :: C=5000, B=10 integer :: Y=800 ... Какие из вариантов выражений допустимы в головной программе ?

Объявлены следующие типы и переменные. type cell real next real prev logical stat end type cell type object integer code real dist real radius end type object type grid type (object) object type (cell) cell integer xa,xb,ya,yb end type grid class (*), pointer :: polym class (cell), pointer :: ptc type (grid), target :: ptg Какие справедливы прикрепления ссылок ?

В следующем фрагменте программы, укажите имена перегруженных процедур и операций. use flow type (grid) GRD type (velocity) VX, VY, VZ ... GRID.Init() call GRD.Add(VX) call GRD.Add(VY,VZ) call GRD.Build(X1=0.0,Y1=0.0,X2=2.0,Y2=1.0) write(1,*) VX + VY, VX - VZ ... call GRD.Draw() ... call VX.VectorField(GRD)

Подключение модуля к головной программе происходит посредствомоператора

В каком разделе находится описание функции ddot

В каких разделах "Свойства проекта" можно выполнить настройку оптимизации ?

Укажите директиву, которая предупреждает о необъявленных переменных

Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interfacecontains real function pnt1(x,y) real x integer 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 pnt3end module mod_E

Укажите параметр компиляции устанавливающий максимальное число раскруток цикла

Укажите параметр компиляции запрещающий оптимизацию

В каком разделе находится описание подпрограммы symv ?

Какие опции компилятора отвечают за использование библиотеки MKL ?

В головной программе используется модуль peoples, который содержит только тип person и модульную процедуру PrintInfo. Головная программа использует модуль peoples.В головной программе объявлена переменная type (person) PS.Укажите верное описание типа person и процедуры PrintInfo, чтобы при вызове call PS.PrintInfo() из головной программы, отображалась информация, содержащаяся в полях переменной PS.

Модульmodule mod_1 type plot integer x1,y1,x2,y2 integer color(255) end type plot type indicator type (plot) plt logical, private :: free character(4) date end type indicator type card type (indicator) indic integer fparam integer sparam end type cardend module mod_1 используется в головной программе.Объявлена переменнаяtype(card) cdУкажите верные варианты доступа к полям производного типа.

Выберите верное задание операции EXTRACT для производного типа

Какие функции используются в выражении res=sin(2.0)*cos(2.0) module mod_F contains real function sin(x) sin=sqrt(sqrt(sqrt(x))) end function sin real function cos(x) cos=x**2.0**2.0 end function cosend module mod_FPROGRAM prog use mod_F implicit none real res res=sin(2.0)*cos(1.0) end

Данная программа компилируется с ошибкой. Какие варианты изменений в программе можно выполнить, чтобы из головной программы вызвать процедуру init из модуля B module mod_A contains subroutine init write(*,*) "Initializing A" end subroutine initend module mod_Amodule mod_B contains subroutine init write(*,*) "Initializing B" end subroutine initend module mod_BPROGRAM prog use mod_A use mod_B implicit none call init() ! вызываем процедуру из модуля Bend

Выберите допустимые объявления модульных переменных для данного варианта программы module mod_Aimplicit none! здесь следует объявить модульные переменные public init_solver contains subroutine init_solver(val) real val B=val*A end subroutine init_solverend module mod_APROGRAM prog use mod_A, Anew => A, Xnew => X implicit none Xnew=2.0 write(*,*) B+Anew+Xnew call init_solver(0.0)end

Объявлен модуль и головная программа module matrix real, public :: A=1.6 real, protected :: B=5.8 real, private :: C=1.0E+10 integer, protected :: X=50 integer, private :: Y=70end module matrixPROGRAM prog use matrix, only : X, BN => B implicit none real :: C=5000, B=10 integer :: Y=800 ... Какие из вариантов выражений допустимы в головной программе ?

Объявлен следующий модуль module matrix public integer :: A=100, B=200, C=300 complex, private :: S=9 integer, protected :: P=8 integer :: Q=100, W=200 integer, private :: N=500end module matrix Какие из перечисленных модульных переменных могут быть использованы вкачестве границ размещаемых массивов в вызывающей головной программе?

Процедуры, описанные атрибутом private

Объявлен модуль и головная программа module matrix real :: A=1000 real, private :: B=3000 real, protected :: C=5000 integer, public :: D=50 integer, protected :: F=70end module matrixPROGRAM prog use matrix, only : D, F, A implicit none real :: C=5000, B=10 ... Какие из вариантов выражений допустимы в головной программе ?

Переменные, объявленные как private

Укажите параметр компиляции означающий максимизацию скорости выполнения

Какие функции используются в выражении res=sin(2.0)*cos(2.0) module mod_F contains real function sin(x) sin=sqrt(sqrt(sqrt(x))) end function sin real function cos(x) cos=x**2.0**2.0 end function cosend module mod_FPROGRAM prog use mod_F, only : cos implicit none real res res=sin(2.0)*cos(1.0) end

Укажите функцию, которая возвращает номер копии caf-программы

Укажите параметр компиляции, который управляет уровнями диагностики автоматического распараллеливания

Какой раздел библиотеки Intel ® Math Kernel Library содержит процедуры, которые выполняют тригонометрические функции над векторам ?

Для типа point выберите правильный код финальной процедуры DeletePointmodule flowinteger, private :: INDEX type point integer x,y,z integer color logical stat contains final :: DeletePoint end type point CONTAINS ... subroutine InitFlow() INDEX=0 end subroutine InitFlowend module flow

Имеется ли конфликт процедур при задании перегруженной процедуры. Если да, то укажите, какие именно. module mod_E interface point module procedure pnt1, pnt2, pnt3 end interfacecontains logical function pnt1(x,y) integer 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 pnt3end module mod_E

Перегрузка операции присваивания реализуется при помощи оператора

Укажите оператор используемый для инкапсуляции процедур модуля

Объявлены следующие типы и переменные. type grid integer adr real alfa real beta end type grid type, extends (grid) :: flow integer coord real dist real param end type flow type regime type (flow) flw real, allocatable :: ux(:,:,:), uy(:,:,:), uz(:,:,:) real R1, R2, R3 end type regime class(*), pointer :: polym class(regime), pointer :: pol_reg type(flow), target :: pol_flw Какие справедливы прикрепления ссылок ?

Процедуры, описанные атрибутом protected

Выберите допустимые объявления модульных переменных для данного варианта программы module mod_Aimplicit none! здесь следует объявить модульные переменные public init_solver contains subroutine init_solver(val) real val x=val*1.0E-10 end subroutine init_solverend module mod_APROGRAM prog use mod_A, Anew => A, Bnew => B implicit none Anew = Anew + 1 write(*,*) Bnew+1 call init_solver(-1.0) Anew=Bnew+1end

Объявлен следующий модуль module matrix integer :: A=100, B=200, C=300 integer, private :: S=9 integer, protected :: P=8 private integer :: Q=100, W=200 integer :: N=500end module matrix Какие из перечисленных модульных переменных могут быть использованы вкачестве границ размещаемых массивов в вызывающей головной программе?

Модуль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 NewTypeend module mod_1 используется в головной программе.Объявлена переменнаяtype(NewType) NTУкажите верные варианты доступа к полям производного типа.

Укажите параметр компиляции, который создает приложение для конкретного типа процессора

Дан модуль, который используется в головной программеmodule mod_1 type person integer year character(64), private :: name="ABC" character(64), private :: sname="DEF" end type person type, extends (person) :: student logical, private :: status character, public :: group end type studentend module mod_1 В головной программе объявлена переменнаяtype (person) pstype (student) stУкажите верные варианты доступа к полям производного типа из головной программы.

Укажите параметр компиляции, который создает приложение не привязанное к конкретному типу процессора

Укажите параметр компиляции позволяющий проверять неинициализированные переменные

В каких разделах "Свойства проекта" указывается создание файла листинга программы ?

Какой раздел библиотеки Intel ® Math Kernel Library содержит процедуры, которые выполняют умножение треугольной матрицы на вектор ?

В каком разделе находится описание подпрограммы trmv ?

Укажите верные имена *.mod файлов входящих в состав MKL

Каждая копия программы генерирует массив из случайных чисел. Каждая копия программы должна записать массив целиком в файл C:datа.txt.Какой оператор следует использовать при записи данных в файл ?

Укажите функцию, которая вычисляет нижнюю границу coarray-переменной

Выберите верные утверждения

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

Перечислите возможности Intel Parallel Studio, Intel Visual Fortran для создания параллельных программ.

В следующем фрагменте программы, какие имена не являются и могут не являться процедурами, привязанными к типу по имени? use grids type (grid_MKE) GR type (point) pt call GR.Init() call GR.PrintInfo() write(*,*) GR.coordinates(10,20) write(*,*) GR.next() write(*,*) GR.values(2,2) if (.NOT.GR.err) then ... pt = GR.points + pt ...

В головной программе используется модуль geom, который содержит только тип triangle и модульную процедуру Square. Головная программа использует модуль geom.В головной программе объявлена переменная type (triangle) TR.Укажите верное описание типа triangle и процедуры Square, для организации вызова write(*,*) TR.Square() из головной программы

Объявлены следующие типы и переменные. type cell real next real prev logical stat end type cell type, extends (cell) :: object integer code real dist real radius end type object type grid type (object) object integer n integer xa,xb,ya,yb end type grid class (*), pointer :: polym class (cell), pointer :: ptc type (grid), target :: ptg Какие справедливы прикрепления ссылок ?