Pascal/Turbo Pascal - potencia de una potencia

hola que tal necesito me ayuden con un problema en pascal y esq necesito hacer un programa que me permita realizar una potencia de x elevado a la n (donde n es un numero introducido por el usuario) (x es el numero de base) enfin elevar la potencia de un numero a otra potencia... gracias anticipadas por la ayuda que me puedan brindar...

function Potencia(Numero,Exponente:Integer):Integer;
var
Temp,I:Integer;
begin
Temp:=Numero;
for I:=2 to Exponente do
Numero:=Numero*Temp;
Potencia:=Numero;
end;

Saludos man!