![]() |
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... |
Tienes que incluir la Unit Math
Código:
procedure TForm1.Button1Click(Sender: TObject); |
Gracias
Gracias Amigo , no sabia que podia ser tan facil ,
Saludos desde Lima Peru |
| La franja horaria es GMT +2. Ahora son las 02:44:29. |
Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi