Строки: проверка баланса скобок - VBA

Узнай цену своей работы

Формулировка задачи:

Проверить баланс скобок в выражении.

Решение задачи: «Строки: проверка баланса скобок»

textual
Листинг программы
for i=1 to len(txt)
if mid$(txt,i,1)="(" then
n=n+1
elseif mid$(txt,i,1)=")" then
n=n-1
if n<0 then 'несоответствие
end if
next
if n then 'несоответствие

Оцени полезность:

10   голосов , оценка 4.2 из 5
Похожие ответы