Дано описание объектов: type A = Object constructor Init; procedure foo; virtual; end; B = Object (A) procedure foo; virtual; end;pb = ^B;var a1:^A; begina1 := New(pB); a1^.foo;
Процедура foo какого объекта будет вызвана?
(Отметьте один правильный вариант ответа.)
Варианты ответа
А
В (Верный ответ)