Ver Mensaje Individual
  #1  
Antiguo 16-12-2010
ZiriusB ZiriusB is offline
Miembro
 
Registrado: oct 2010
Posts: 86
Reputación: 16
ZiriusB Va por buen camino
Question Funcion de Redondeo

Buenas amigos, tengo un pequeño problema y nada mejor que esta comunidad para encontrar una solución, tengo esta formula que encontre en la web para el redondeo de un numero... pero me lanza un error en esta linea:

p10 := Power(10, cifrasSig);

el "Power" me lanza el error "Undeclarated identifier: Power"

esta es la formula completa; espero podais ayudarme!

Código Delphi [-]
function Redondear(numero : real ; cifrasSig : integer) : real;
  var p10 : extended;

begin

{ siendo 2 el caso más frecuente }
    if (cifrasSig = 2) then
      result := round(numero * 100) / 100
    else

      begin
        p10 := Power(10, cifrasSig);
        result := round(numero * p10) / p10;
      end;
end;
__________________
"Ningun precio es alto por el privilegio de ser uno mismo..."
Responder Con Cita