Объявлены следующие типы и переменные. 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
Какие справедливы прикрепления ссылок ?
(Ответ считается верным, если отмечены все правильные варианты ответов.)
Варианты ответа
polym => ptg(Верный ответ)
polym=>um1.sm(1:100:4)(Верный ответ)
ptc => ptg.object
polym => ptg.object(Верный ответ)
polym => ptc(Верный ответ)