if %pass%==XXXX***** echo si ves esto eres dios
Jajaja soy dios tmb xD
= me tomo tiempo (no se kuanto) resolverlo.
Jajaja soy dios tmb xD
= me tomo tiempo (no se kuanto) resolverlo.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes Menú@echo off
title Lista de Raices cuadradas que dan resultados enteros del 100 al 100.000.000 [black_hack]
color a
cls
if exist sqrt.txt del /q /f sqrt.txt
echo By Black_hack>>sqrt.txt
:X_x_sqrt_x_x
set sqrtfuncion=0
cls
echo.
echo ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
echo º -Seleccione lo que desea hacer- º
echo ÌÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹
echo º 1. Calcular raices enteras del 100 al 100.000.000 º
echo º 2. Ayuda y documentacion º
echo º 3. Salir º
echo ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
echo.
set /p sqrtfuncion= Que desea hacer?
if %sqrtfuncion%==1 goto sqrt
if %sqrtfuncion%==2 goto help_e_info
if %sqrtfuncion%==3 exit
if %sqrtfuncion%==0 goto X_x_sqrt_x_x
goto X_x_sqrt_x_x
:sqrt
::crea variables y comienza la parte que calcula
set sqrt=1
set sqrtnum=1
set diferencia=3
:funcion_principal_sqrt_
set rd20v3=Raiz de %sqrt%=%sqrtnum%
echo %rd20v3%>>sqrt.txt
set /a sqrt=%sqrt% +%diferencia%
set /a sqrtnum=%sqrtnum% +1
set /a diferencia=%diferencia% +2
find /i \"100000000\" sqrt.txt>nul&& if ERRORLEVEL==0 start sqrt.txt & exit
goto funcion_principal_sqrt_
::fin de lo importante
:help_e_info
echo.
echo _________________
echo.
echo Ayuda
echo _________________
echo.
echo Este programa solamente calcula raices hasta el 100.000.000 cuya raiz es 10.000 pero tu puedes
echo quitar ese limite abriendo este bat con el Block de Notas [NOTEPAD] y borrarle la sgte. linea:
echo find /i \"100000000\" sqrt.txt && if ERRORLEVEL==0 start sqrt.txt & exit
echo Eso producira [obviamente] que no exista limite y pueda calcular infinitud de raices enteras
echo Este codigo se basa en la diferencia [resto] que hay en una raiz que da resultado entero de otra
echo [Yo descubri eso cuando hacia graficos de raices enteras].Todas las raices tienen esa propiedad ,
echo ya sean Cubicas,cuadradas,etc.La de la Raiz cuadrada es la mas simple ya que la diferencia entre
echo la de 0 y 1 es 1 ,1 y 4 es 3 ,la de 4 y 9 es 5,la de 9 y 16 es 7 ,la de 16 y 25 es 9.
echo Si se dan cuenta la diferencia entre esos valores aumenta 2 y sus raices en orden son 1,2,3,4 y 5
echo Por eso la variable sqrtnum aumenta 1 ,la variable diferencia aumenta 2 y la variable sqrt es 1 mas
echo la variable diferencia.
echo Al final del calculo se le abrira una ventana del Block de Notas con titulo sqrt
echo.
echo Espero que te sirva.
pause>nul
goto X_x_sqrt_x_x