Hola invitado         02 Sep, 2010 - 04:45
Menú principal
 
Ads
 
Patrocinadores
 
Anuncios
 
© 2009 PortalFox
Saber si un número es par lecturas 9354
 Enviado por Luis María Guayán en Jueves, 18 Noviembre, 2004
Rutinas Tres funciones distintas para saber si un número entero es par.
1. Utilizando el operador %
FUNCTION EsPar(tnEntero)
  RETURN tnEntero % 2 = 0
ENDFUNC
2. Utilizando el operador ^
FUNCTION EsPar(tnEntero)
  RETURN -1 ^ tnEntero = 1
ENDFUNC
3. Utilizando BITTEST()
FUNCTION EsPar(tnEntero)
  RETURN NOT BITTEST(tnEntero,0)
ENDFUNC
Nota del editor: Las funciones 1 y 2 fueron tomadas del Grupo de Noticias de VFP en español, de respuestas enviadas por Luis María Guayán y Dario David Puccio respectivamente. La función 3 fue tomada de la ayuda de VFP de la función BITTEST().
 Versión imprimible  
Saber si un número es par | Entrar/Crear una cuenta | 2 Comentarios
Los comentarios son propiedad de sus respectivos autores.
No somos responsables de su contenido.

Re: Saber si un número es par


por OmarSilvestro en 21 Nov, 2004 - 11:32
(Información del usuario  | Enviar un mensaje 
Otra forma de saber si un numero es par, creo que la más clásica es usando la función MOD

Módulo o Resto de una división, si al dividir un numero por dos el resto es cero , entonces el numero es par, sino es impar

IF (numero_entero,29) = 0
? numero_entero, ' ES PAR'
ELSE
? numero_entero,' ES IMPAR'
ENDIF




Todas las marcas y los logos utilizados en este sitio son propiedad de sus respectivos dueños.
Los artículos, noticias y comentarios son propiedad y responsabilidad de sus respectivos autores.
Copyright © 2000-2010 PortalFox. Todos los derechos reservados.