Модуль

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 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_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Укажите верные варианты доступа к полям производного типа.

Модуль

module mod_1  type plot    integer x1,y1,x2,y2    integer, private :: color(255)  end type plot  type indicator    type (plot) plt    logical :: free    character(4), public :: date  end type indicator  type card    type (indicator) indic    integer fparam    integer, private :: sparam  end type cardend module mod_1        

используется в головной программе.

Объявлена переменная

type(card) cdУкажите верные варианты доступа к полям производного типа.

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

module mod_1  type rectangle    integer x1,y1,x2,y2    integer color    character, private :: name  end type rectangle  type, extends (rectangle) :: roundrect    integer radius    real, public :: center  end type roundrectend module mod_1        

В головной программе объявлена переменная

type (rectangle) rctУкажите верные варианты доступа к полям производного типа из головной программы.

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

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 mod_1  type person    integer, public :: year    character(64), private ::  name="ABC"    character(64), public :: sname="DEF"  end type person  private person  type, extends (person) :: student    logical,  public :: status    character, private :: group  end type studentend module mod_1        

В головной программе объявлена переменная

type (student) stУкажите верные варианты доступа к полям производного типа из головной программы.

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

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Укажите верные варианты доступа к полям производного типа из головной программы.

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

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

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

В программе объявлены типы и переменная

  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)

Объявлены следующие типы и переменные.

  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?