[BATCH]Script simple para sacar raices cuadradas exactas

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

Código:

@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.

Código:

@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

Código:

set /a var2=%var%*%var%

añadiendole un *%var% .