А в чем мудрость, помоему ясно.
Насколько понимаю в С++ фигурирует понятие "дружественного класса", в паскале же это понятие реализовано в другой форме.
Раз в ОПаскале чисто модульная архитектура (предполагается, что отдельный класс или семейство в отдельном модуле), то и модуль - не просто контейнер кода, но и определяет некоторые права, в частности все классы, описанные в одном модуле - "дружественные", - это хорошо для этом устойчивых классов - реализуется более эффективное взаимодействие, правда за счет очень высокой степени связанности