FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Suma de dígitos primos - Simplificar código
Hola, como están, espero que muy bien y con ánimos de ayudar, tengo un pequeño código que suma los dígitos primos de cualquier combinación de números que el usuario teclee, quisiera saber ¿cómo simplifico el código?, los dígitos van del 1 al 9.
-Si el usuario teclea: 245896, entonces los primos son: 2 y 5, y la suma de estos 2 primos es: 7... -Si el usuario teclea: 221479, entonces los primos son: 2, 2, 7 y la suma de estos 3 primos es: 11... No sé qué hacer con esas excepciones que he puesto allí, en total 4, donde "r (residuo)" tiene que ser distinto de: 1, 4, 6 y 9... ¿Qué puedo hacer para simplificar esta operación?, pensé en hacerlo con la fórmula de series, pero se complica más, al menos para mí... trate de hacerlo de otra manera pero se me queda el 2, ya que es par...
Proyecto hecho en Delphi XE3, muchas gracias por su ayuda... y consejos que me puedan brindar... |
#2
|
|||
|
|||
Que tal así:
|
#3
|
|||
|
|||
Excelente
Si amigo, creo que la mejor opcion era ponerle los numeros primos y que me ignore todos los demas, jeje... esta genial el codigo, le puse un begin al Edit1 y ya me funciona, muchas gracias WkaymQ48...
|
#4
|
||||
|
||||
Hola Subliminalz.
Sólo como agregado, si quisieras obtener la suma a partir de un valor numérico:
Saludos.
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Ayuda con numeros primos | Jcn | Varios | 4 | 28-05-2013 01:39:20 |
Simplificar el uso de if al usar RadioGroup | wull | OOP | 8 | 07-09-2012 20:35:09 |
Promedio.. digitos primos .. | luisito2011 | Varios | 3 | 07-05-2011 02:54:02 |
Ayuda para Simplificar codigo | escorpionrojo43 | OOP | 7 | 08-05-2010 17:55:48 |
Simplificar Seguridad En Random | amonxanubis4 | Varios | 1 | 14-01-2010 11:46:59 |
|