Club Delphi  
    FTP   CCD     Enlaces   Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Buscar Temas de Hoy Marcar Foros Como Leídos

Respuesta
 
Herramientas Desplegado
  #1  
Antiguo 12-10-2007
jocey jocey is offline
Miembro
 
Registrado: ene 2007
Posts: 111
jocey Va por buen camino
Raiz Cuadrada

Amigos, se que esto les puede parecer un tanto tonto, pero necesito saber el nombre de la funcion que usa delphi para calcular la raiz cuadrada de un numero.

Gracias
Responder Con Cita
  #2  
Antiguo 12-10-2007
Khronos Khronos is offline
Miembro
 
Registrado: abr 2007
Posts: 298
Khronos Va por buen camino
Es sencillo, utiliza las funciones sqrt (raiz cuadrada) y sqr (cuadrado).

Código Delphi [-]
 
procedure TForm1.Button1Click(Sender: TObject);
var
i: real;
begin
i:=9;
showmessage(floattostr(sqrt(i)));
end;

Salu2
Responder Con Cita
  #3  
Antiguo 12-10-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 6.464
jhonny Va por buen camino
Al función es Sqrt.
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"
Responder Con Cita
  #4  
Antiguo 12-10-2007
Avatar de jhonny
jhonny jhonny is offline
Jhonny Suárez
 
Registrado: may 2003
Ubicación: Colombia
Posts: 6.464
jhonny Va por buen camino
Vaya¡¡ khronos se me a adelantado .

Si quieres mas información sobre la raiz cuadrada, cubica y todas las que necesites, podras sacar una conclusión del hilo http://www.clubdelphi.com/foros/showthread.php?t=28471
__________________
Lecciones de mi Madre. Tema: modificación del comportamiento, "Pará de actuar como tu padre!"
Responder Con Cita
  #5  
Antiguo 12-10-2007
Khronos Khronos is offline
Miembro
 
Registrado: abr 2007
Posts: 298
Khronos Va por buen camino
Jaja, te gané por unos segundos

Salu2
Responder Con Cita
  #6  
Antiguo 12-10-2007
Avatar de xEsk
[xEsk] xEsk is offline
Miembro Premium
 
Registrado: feb 2006
Posts: 449
xEsk Va por buen camino
Como han dicho hace nada, la función es sqrt, pero en caso de no conocer la función siempre puedes usar la base matemática de las raíces: x^(1/y).

Ejemplos:
Código Delphi [-]
resultado:=Power(9, 0.5); // raíz cuadrada de nueve
resultado:=Power(9, 1/3); // raíz cúbica
// at infinitum

Saludos.

Última edición por xEsk fecha: 12-10-2007 a las 16:11:10.
Responder Con Cita
  #7  
Antiguo 13-10-2007
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
seoane Va por buen camino
Ya puestos a ser originales

Código Delphi [-]
function Raiz(X: Extended): Extended;
begin
  Result:= Exp(Ln(X)/2);
end;
Responder Con Cita
  #8  
Antiguo 13-10-2007
Avatar de xEsk
[xEsk] xEsk is offline
Miembro Premium
 
Registrado: feb 2006
Posts: 449
xEsk Va por buen camino
Cita:
Empezado por seoane Ver Mensaje
Ya puestos a ser originales

Código Delphi [-]
function Raiz(X: Extended): Extended;
begin
  Result:= Exp(Ln(X)/2);
end;
xDDD Bueno, pues ahi mi otra opción xD
Código Delphi [-]
function Raiz(x: Extended): Extended;
var
  n, i: Extended;

begin
  n:=x;
  i:=0.0;
  while i <> n do
    begin
      i:=n;
      n:=(x/n + n)/2;
    end;
  Result:=n;
end;

El algoritmo se reduce al método de Newton sobre la función f(r)= (r^2)-x
Responder Con Cita
  #9  
Antiguo 13-10-2007
Robert01 Robert01 is offline
Miembro
 
Registrado: feb 2006
Ubicación: Córdoba, Argentina
Posts: 895
Robert01 Va por buen camino
Usando el método del algoritmo babilónico. Me ganó xEsk por unos segundos por lo tanto no pongo el código.
Responder Con Cita
  #10  
Antiguo 13-10-2007
Avatar de egostar
[egostar] egostar is offline
Registrado
 
Registrado: feb 2006
Posts: 6.300
egostar Va por buen camino
Bueno ya está por demás que ponga otra solución....

Salud OS

PD. A que muchacho tan logarítmico eres amigo Domingo
__________________

Nuestra naturaleza está en movimiento. El reposo absoluto es la muerte”
– Blaise Pascal.
Responder Con Cita
Respuesta


Herramientas
Desplegado

Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Raiz cubica y raiz y jorgegetafe Varios 3 05-02-2007 22:42:35
knapsack+busqueda raiz finees Varios 0 17-11-2006 16:48:51
Funcion Raiz herodes Varios 3 22-12-2005 20:46:05
Saber el día a raiz de una fecha Luana Varios 2 15-02-2005 00:05:53
Raiz Cronos Varios 1 25-10-2003 01:26:52


La franja horaria es GMT +2. Ahora son las 15:57:01.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2014, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi