Código Delphi [-]if (Numero mod 2)=0 then //Es par else //Es Impar;
if (Numero mod 2)=0 then //Es par else //Es Impar;