[Código-Batch] Raíz Cuadrada - JaAViEr

Iniciado por JaAViEr, Julio 17, 2011, 05:22:27 AM

Tema anterior - Siguiente tema

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

Imprimir
Ir Abajo Páginas1
Acciones del Usuario
Julio 17, 2011, 05:22:27 AM Ultima modificación: Febrero 22, 2015, 09:32:50 PM por Expermicid
Sencillo para sacar raíz  de enteros:D
Código: dos

@echo off
set/a"x=0"
set/a"count=0"
set/p"var=>"
title %var%
:count
set/a"count+=1"
set/a"x=%count%*%count%"
if %x% EQU %var% (echo.Raiz %Count%&exit/b)
goto:count

Prueben numeros:
4=2
9=3
16=4
81=9
121=11
Etc

Saludos.
No tienes permitido ver los links. Registrarse o Entrar a mi cuenta
Imprimir
Ir Arriba Páginas1
Acciones del Usuario