Pascal/Turbo Pascal - Función para elevar

les agradecería mucho si me podrían ayudar a saber cual es la función para elevar a una potencia, debido a que he estado buscándola y no he obtenido respuesta.

Gracias;

Pascal estadar no tiene un operador de exponenciación. Hay que implementar una funcion que lo haga tal como:

function poten(base,exponente:real):real;
var
t:integer;
temp:real;

begin
if base=0 then poten:=1
else
begin
temp:=base;
for t:=trunc(exponente) downto 2 do base:=base*temp;
poten:=base;
end;
end;

ojala te sirva.