elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Arreglado, de nuevo, el registro del warzone (wargame) de EHN


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [Reto Batch] Números II (Puntoinfinito)
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: 1 [2] Ir Abajo Respuesta Imprimir
Autor Tema: [Reto Batch] Números II (Puntoinfinito)  (Leído 5,257 veces)
Binary_Death

Desconectado Desconectado

Mensajes: 214



Ver Perfil
Re: [Reto Batch] Números II (Puntoinfinito)
« Respuesta #10 en: 22 Julio 2012, 17:29 pm »

Mi solución a este reto:

Código:
@echo off
setlocal enabledelayedexpansion

set/p "num=Cifra >> "

set/a hst=0,lst=9
set "evn_lst=" & set "rev_lst="

for /f "tokens=* eol=" %%_ in (
'"cmd /u /c echo+%num%|more"'
) do (
set "rev_lst=%%_!rev_lst!"
if %%_ GTR !hst! set/a hst=%%_
if %%_ LSS !lst! set/a lst=%%_
set/a pry=%%_ %% 2
if !pry! EQU 0 set "evn_lst=!evn_lst!%%_"
)
more/c<nul
echo: Cifra: %num% ^| Invertido: %rev_lst% ^| Mayor: %hst% ^| Menor: %lst% ^| Pares: %evn_lst%
pause 1>nul & exit

Otro más para la colección. A ver si hoy los termino todos ya  :P


En línea

Meine programmen

Desconectado Desconectado

Mensajes: 121



Ver Perfil
Re: [Reto Batch] Números II (Puntoinfinito)
« Respuesta #11 en: 22 Diciembre 2012, 19:56 pm »

Pues aqui esta mi solucion

Código:
@ECHO OFF
SetLocal EnableDelayedExpansion
SET /P NUMNAT=¨Numero natural?
echo %NUMNAT%>NUMNAT.bar
FOR %%A IN (NUMNAT.bar) DO (SET /A LONG=%%~zA - 2)
DEL NUMNAT.bar
SET /A LONGMENOS1=%LONG%-1
SET NUMNATINV=
FOR /L %%B IN (0,1,%LONGMENOS1%) DO (SET NUMNATINV=!NUMNAT:~%%B,1!!NUMNATINV: =!
SET NUMNATESP=!NUMNATESP!!NUMNAT:~%%B,1! )
FOR %%C IN (%NUMNATESP%) DO (IF .!NUMMAX!.==.. SET NUMMAX=%%C
IF %%C GEQ !NUMMAX! SET NUMMAX=%%C)
FOR %%D IN (%NUMNATESP%) DO (IF .!NUMMIN!.==.. SET NUMMIN=%%D
IF %%D LEQ !NUMMIN! SET NUMMIN=%%D)
FOR %%E IN (%NUMNATESP%) DO (SET /A MOD=%%E %% 2
IF !MOD!==0 SET PARNUMS=!PARNUMS!%%E )
echo Numero          : %NUMNAT%
echo Numero invertido: %NUMNATINV%
echo Numero menor    : %NUMMIN%
echo Numero mayor    : %NUMMAX%
echo Numeros pares   : %PARNUMS%
pause >nul
exit
A ver que tal lo hice  ;D


En línea

REMEMBER! Reality is an illusion, the universe is a hologram, BUY GOLD! BYE!!

Dankhrat

Desconectado Desconectado

Mensajes: 7



Ver Perfil
Re: [Reto Batch] Números II (Puntoinfinito)
« Respuesta #12 en: 7 Marzo 2014, 03:37 am »

Hola, soy nuevo en esto, podrían decirme que debo empezar a estudiar, leer para hacer esto, no quiero leer las soluciones, de hecho no las he visto, claro esta si me recomiendan algo por favor sea de forma ordenada, desde lo basico
En línea

Páginas: 1 [2] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Reto: Números primos en python
Ejercicios
Novlucker 6 8,538 Último mensaje 24 Noviembre 2010, 16:02 pm
por Novlucker
Sacar numeros de una ecuacion? reto? « 1 2 »
Programación Visual Basic
Edu 12 3,372 Último mensaje 14 Marzo 2011, 16:58 pm
por 79137913
[RETO] + Funcion Extraer Numeros de Cadenas! « 1 2 ... 5 6 »
Programación Visual Basic
x64core 55 21,144 Último mensaje 9 Enero 2012, 10:26 am
por Psyke1
[Reto Batch] Hex2Dec Batch Command « 1 2 »
Scripting
BatchianoISpyxolo 15 5,487 Último mensaje 22 Julio 2012, 06:00 am
por Binary_Death
[Reto Batch] Generador de numeros primos
Scripting
Stakewinner00 8 6,656 Último mensaje 23 Julio 2012, 02:51 am
por AgnesBlack
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines