База ответов ИНТУИТ

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

<<- Назад к вопросам

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

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

(Ответ считается верным, если отмечены все правильные варианты ответов.)

Варианты ответа
  subroutine Square    type(triangle) tr    write(*,*) abs((tr.x1-tr.x2)*(tr.y3-tr.y2)-(tr.y1-tr.y2)*(tr.x3-tr.x2))/2    end subroutine Square        
real function Square(tr)  class(triangle) tr  Square=abs((tr.x1-tr.x2)*(tr.y3-tr.y2)-(tr.y1-tr.y2)*(tr.x3-tr.x2))/2  end function Square        
(Верный ответ)
type triangle  real x1,y1,x2,y2,x3,y3  contains    procedure, pass :: Squareend type triangle        
(Верный ответ)
type triangle  real x1,y1,x2,y2,x3,y3  contains    procedure, nopass :: Squareend type triangle        
real function Square(tr)  type(triangle) tr  Square=abs((tr.x1-tr.x2)*(tr.y3-tr.y2)-(tr.y1-tr.y2)*(tr.x3-tr.x2))/2  end function Square        
Похожие вопросы

В головной программе используется модуль geom, который содержит только тип circle и модульную процедуру IncRadius. Головная программа использует модуль geom.В головной программе объявлена переменная type (circle) CR.

Укажите верное описание типа circle и процедуры IncRadius, чтобы при вызове call CR.IncRadius(10.0) из головной программы, поле R переменной CR было изменено.

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

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

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

Укажите верное описание типа animal и процедуры PrintTitle, для организации вызова call AN.PrintTitle() из головной программы.

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

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

Описан модуль, который подключен к головной программе
module mod_1 integer, protected :: A=1,B=2,C=3 integer, public :: D=7, E=8 public  F, init contains   subroutine init(x,y)     integer x,y     A=x+y   end subroutine init   integer function F     F=A+D+E-C   end function Fend module mod_1        
Какой результат вернет функция F после вызова процедуры callinit(1,2) и выполнения операции присваивания E=A+B в головной программе ?
Дан модуль, который используется в головной программе
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 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Укажите верные варианты доступа к полям производного типа из головной программы.
В программе используется модуль math_M. Чтобы подключить ещеодин модуль graph_M к головной программе следует
Дан модуль, который используется в головной программе
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Укажите верные варианты доступа к полям производного типа из головной программы.