Create Prog 05 Digitos pares(10 de la pag 75)