[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