[BATCH]Script simple para sacar raices cuadradas exactas

Iniciado por onixes001, 3 Marzo 2009, 20:57 PM

0 Miembros y 1 Visitante están viendo este tema.

onixes001

Buenas aqui dejo mi code para sacar raices cuadradas exactas en batch.

@echo off
::Programa creado por onixes.
::Script para sacar raices cuadradas exactas
color 0a
:principio
cls
set /p var1=Introduce el numero a sacar la raiz cuadrada:
set var=0
:sige
set /a var2=%var%*%var%
if %var2%==%var1% (goto esta) else set /a var=%var%+1
if %var%==10001 (goto error) else goto sige
:esta
echo El resultado es: %var%
pause
exit
:error
echo ERROR
echo ................................................................................
echo ................................................................................
echo Posiblemente la raiz del numero que quieres hacer, sea decimal, este programa solo saca raices exactas.
pause
goto principio


Este se usa por consola, copiarlo a %windir%\system32 con l nombre de raiz, abrir una cmd y escribid raiz numero y saca la raiz.
@echo off
::Programa creado por onixes.
::Script para sacar raices cuadradas exactas
color 0a
:principio
cls
set var1=%1
set var=0
:sige
set /a var2=%var%*%var%
if %var2%==%var1% (goto esta) else set /a var=%var%+1
if %var%==10001 (goto error) else goto sige
:esta
echo El resultado es: %var%
pause
exit
:error
echo ERROR
echo ................................................................................
echo ................................................................................
echo Posiblemente la raiz del numero que quieres hacer, sea decimal, este programa solo saca raices exactas.
pause
goto principio


Tambien se puede hacer para sacar cubicas cambiando
set /a var2=%var%*%var%
añadiendole un *%var% .

bolivianito