Как построить Граф соответствия парных скобок?

[Даниил]

Здравствуйте!

и ПОМОГИТЕ!!!!!!


Срочно нужен код программы для
постройки графа соответствия парных скобок.

на MSWord/VBA..

Заранее спасибо.

[pronto]

Советую более подробно перефразировать задачу...

[Ramzes]

что есть "граф" ?

[Amed]

Спрашиваем у яндекса "что такое граф?". Первая ссылка

Что есть соответствие парных скобок? Факт, что число открывающих равно числу закрывающих?

[GSerg]

Если текст документа суть формула со скобками, то

Код: Выделить всё

Sub afdsg()
  Dim c As Long
 
  With ThisDocument.Range.Find
    .ClearFormatting
    Do While .Execute("[\(\)]", , , True)
      If .Parent.Text = "(" Then
        c = c + 1
        .Parent.Font.ColorIndex = c
      Else
        .Parent.Font.ColorIndex = c
        c = c - 1
      End If
    Loop
  End With
End Sub