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