Underc0de

Programación Scripting => Batch - Bash => Mensaje iniciado por: ANTRAX en Julio 18, 2011, 09:32:07 PM

Título: Calcular Raices
Publicado por: ANTRAX en Julio 18, 2011, 09:32:07 PM
Código (dos) [Seleccionar]
:: Autor Sdc
@echo off
if NOT "%~1"=="vv" (cmd /v /c %~nx0 vv^&exit&goto:EOF)
set /P x=Valor:
FOR /L %%i IN (%x%,-2,1) DO (
set /A y=%x%/%%i
IF /I !y! EQU %%i (
echo %%i
goto:EOF
)
)
Título: Re:Calcular Raices
Publicado por: ANTRAX en Julio 18, 2011, 09:32:34 PM
Código (dos) [Seleccionar]
:: Autor ne0x
@echo off
set /P x=Valor :
:BUCLE
set /a cont=cont+1
set /a multi=cont*cont
if %multi%==%x% echo Raiz: %cont%&pause&goto:EOF
if %multi% GTR %x% echo El valor no tiene raiz entera&pause&goto:EOF
goto BUCLE