FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
#1
|
|||
|
|||
Potencia
Hola Amigos: tengo una pregunta respecto a un problema que nos han planteado en el trabajo, es referente a una potencia.
recuerdo muy bien haber hecho funciones de potencia en pascal en la universidad, mas o menos seria de esta forma Function Potencia(Base : Double; Exponente : Integer) : Double; var Temporal : Double; Contador : Integer; begin Temporal := 1; Contador := 0; while Contador < Exponente do begin Contador := Contador + 1; Temporal := Temporal * Base; end; Result := Temporal; end; Asi es como elevamos una base real a un numero entero , pero que sucede cuando el exponente es real , como por ejemplo 0.83333 o 1.58, como se podria implementar una funcion en delphi con base real y exponente real se aceptan todas las sugerencias muchas gracias... |
#2
|
||||
|
||||
Tienes que incluir la Unit Math
Código:
procedure TForm1.Button1Click(Sender: TObject); begin ShowMessage(FormatFloat(',0.00',Power(2.5,3.5))); end;
__________________
Guía de Estilo de los Foros Cita:
|
#3
|
|||
|
|||
Gracias
Gracias Amigo , no sabia que podia ser tan facil ,
Saludos desde Lima Peru |
|
|
|