[pyar] [OT] - Checkeando parentesis balanceados.

Daniel Moisset dmoisset en machinalis.com
Vie Jun 18 16:25:08 ART 2010


2010/6/18 Martin Cerdeira <martincerdeira en gmail.com>:
>
> Mi function era algo así:
>
> Funcion CuentaPa(c) Boolean
>     k Integer
>     i  Integer
>         If PrimerChar = ")" Or UltimoChar = "(" Then
>             CuentaPa = False
>             Exit
>         End If
>         For i = 0 To Largo(c)
>             If CurrentChar()= "("   Then
>                 k = k + 1
>             Else
>                 k = k - 1
>             End If
>         Next i
>         CuentaPa = (k = 0)
> End

Pero no anda con "())(()"

D.



More information about the pyar mailing list