Ver Mensaje Individual
  #3  
Antiguo 21-07-2006
Avatar de seoane
[seoane] seoane is offline
Miembro Premium
 
Registrado: feb 2004
Ubicación: A Coruña, España
Posts: 3.717
Reputación: 24
seoane Va por buen camino
Al menos en delphi 7 si que puedes trabar con numeros imaginarios, con la unit VarCmplx. Por ejemplo sumar dos numeros y obtener su modulo.

Código Delphi [-]
uses VarCmplx;

var
  a,b: variant;
begin
  a:= VarComplexCreate(3,2); //3+2i
  b:= VarComplexCreate(0,2); //2i
  a:= a + b;
  ShowMessage(FloatToStr(VarComplexAbs(a)));
end;

Echale un vistazo a la ayuda para ver todas las funciones que hay disponibles para numeros coplejos
Responder Con Cita