Foro de elhacker.net

Programación => Ejercicios => Mensaje iniciado por: leogtz en 4 Abril 2009, 19:55 pm



Título: [Batch] Pedir numero y sumar digitos
Publicado por: leogtz en 4 Abril 2009, 19:55 pm
Pedir un numero al usuario y sumar sus digitos :
Código:
Numero : 36574
Digitos : 5
Suma de todos los digitos : 25
Press any key...
Código
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. :code
  4. :: Creacion de variables :
  5. set /p "numero=Numero : "      // Esta variable ira disminuyendo
  6. if not defined numero (goto:code)
  7. set /a "contador=0"
  8. set "numero2=%numero%"
  9. set /a suma=0
  10. :bucle
  11. if not defined numero (goto:end)
  12. set "numero=%numero:~1%"
  13. set /a "contador+=1"
  14. goto:bucle
  15. :end
  16. echo.Digitos : %contador%
  17. set /a contador-=1
  18. for /l %%_ in (0 1 %contador%) do (
  19. set /a suma+=!numero2:~% style="color: #448888;">%_,1!
  20. )
  21. echo Suma de todos los digitos : %suma%
  22. goto:eof