como determinar si un numero es par o impar

[Casimiro Noteví]

Empezado por rgstuamigo

[..]¿Hacer una funcion que diga si un número es par pero sin usar division(div) ni residuo(mod) ni cualquier otra función propia del lenguaje? [..]

Pero, ¿dijo qué lenguaje? jejeje

[rgstuamigo]

Empezado por Casimiro Notevi

Pero, ¿dijo qué lenguaje? jejeje

Bueno aquella vez estabamos dando los primeros pininos en Pascal, aunque en realidad el examen era escrito y tenias que hacerlo usando Diagrama de flujo ó Pseudocódigo lo cual implica que la solucion serviría para cualquier lenguaje de programación.
Saludos...

[Ñuño Martínez]

Todos los microprocesadores tienen un indicador de paridad. Entonces podría utilizarse código máquina:

Código Delphi [-]
{ Como no sepo 8x86, utilizo Z-80 :-P }
FUNCTION Par (aValue: INTEGER): BOOLEAN;
ASM
  POP BC
  POP HL
  LD IX, 0
  LD IY, 1
  LD A, L
  OR A
  JP P, SI
  PUSH IX
  JR FIN
SI:
  PUSH IY
FIN:
  PUSH BC
END;

Bueno, más o menos...

[Casimiro Noteví]

El z-80, qué recuerdos

[Ñuño Martínez]

Empezado por Casimiro Notevi

El z-80, qué recuerdos

Otra forma más sencilla (sólo el ASM):

  POP BC
  POP HL
  LD IX, 0
  LD IY, 1
  RRC L
  JP C, SI
  PUSH IX
  JR FIN
SI:
  PUSH IY
FIN:
  PUSH BC

Es que acabo de recordar que el "shiftt" puede utilizar el acarreo.

[roman]

¡Válgame! Ésto sí que es rizar el rizo

Desempolvando el poco ensamblador que alguna vez supe, creo que se puede así ¿no?

Código Delphi [-]
function par(n: integer): boolean;
asm
  and ax,1
  dec ax
end;

// Saludos

[[escafandra]]

El ejemplo de roman es una buena adaptación al asm del concepto de que el bit menos significativo nos dirá si es par.

bool par = !(n & 0x1);

Al tratarse de C, no podemos implementar el código tal cual lo expone roman para delphi. En C los parámetros se pasan en la pila por defecto (__cdecl). Así que tendremos que forzar el paso por registro (__fastcall) que es el estado por defecto de delphi:

bool __fastcall par(int n)
{
  asm{
  and ax,1
  dec ax
  }
}

Saludos.