Funcion de Redondeo

[ZiriusB]

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;