Funcion para derminar si un número es par

Hola Gerardo:

Podés saber si un numero es par sacando el resto de la división por 2. Si no
hay resto entonces es par.

Ejemplo:
IF MOD(TuNumero,2) = 0
? "Es PAR"
ELSE
? "Es IMPAR"
ENDIF

"Gerardo" escribió en el mensaje
news:

Hay alguna funcion en Fox para determinar si un número es par y/o impar.

Ya que estamos, hagamos la función que es cortita como viraje de laucha :-)

FUNCTION EsPar(tn)
RETURN tn % 2 = 0
ENDFUNC

Ahora la duda si el "0" (cero) ¿es par o impar?
En caso de no tomarlo com opar, la siguente función

FUNCTION EsPar(tn)
RETURN IIF(tn = 0,.F.,tn % 2 = 0)
ENDFUNC

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Fernando D. Bozzo" escribió en el mensaje
news:%23%

Hola Gerardo:

Podés saber si un numero es par sacando el resto de la división por 2. Si no
hay resto entonces es par.

Ejemplo:
IF MOD(TuNumero,2) = 0
? "Es PAR"
ELSE
? "Es IMPAR"
ENDIF

"Gerardo" escribió en el mensaje
news:
> Hay alguna funcion en Fox para determinar si un número es par y/o impar.
>
>

Muy amable gracias.

"Fernando D. Bozzo" wrote in message
news:%23%

Hola Gerardo:

Podés saber si un numero es par sacando el resto de la división por 2. Si

no

hay resto entonces es par.

Ejemplo:
IF MOD(TuNumero,2) = 0
? "Es PAR"
ELSE
? "Es IMPAR"
ENDIF

"Gerardo" escribió en el mensaje
news:
> Hay alguna funcion en Fox para determinar si un número es par y/o impar.
>
>

Si divides entre 2 y compruebas que el cociente sea 0 es
par.
lc = numero / 2
if mod(numero,2)= 0

Hay alguna funcion en Fox para determinar si un número es

par y/o impar.

.

Perdona , no se que he hecho que se piró el anterior
mensaje.
if mod(numero,2) = 0

Ya que estamos, hagamos la función que es cortita como

viraje de laucha :-)

FUNCTION EsPar(tn)
RETURN tn % 2 = 0
ENDFUNC

Ahora la duda si el "0" (cero) ¿es par o impar?
En caso de no tomarlo com opar, la siguente función

FUNCTION EsPar(tn)
RETURN IIF(tn = 0,.F.,tn % 2 = 0)
ENDFUNC

Luis María Guayán
Tucumán, Argentina
________________________________
SysOp de www.PortalFox.com
Microsoft Visual FoxPro MVP
________________________________
La palabra imposible solo figura
en el diccionario de los tontos


"Fernando D. Bozzo" escribió en el

mensaje

news:%23%

Hola Gerardo:

Podés saber si un numero es par sacando el resto de la

división por 2. Si no

hay resto entonces es par.

Ejemplo:
IF MOD(TuNumero,2) = 0
? "Es PAR"
ELSE
? "Es IMPAR"
ENDIF

"Gerardo" escribió en el mensaje
news:
> Hay alguna funcion en Fox para determinar si un

número es par y/o impar.

>
>

.