type cd1=class end; cd2=record end; cd3=template //тожесамое что template class end; cd4=template class end; cd5=template record end; cd6=interface //Выдавать ошибку "Интерфейс не может иметь......" Тожесамое с секциией where для классов, записей..... end; begin end.