Potencia de un número

Programa en Pseudocódigo para resolver el siguiente problema:
Dados dos números x y n, Calcular x^n.
Donde x es cualquier número real y n es un entero positivo no nulo.

Proceso x_potencia_n
    Leer x
    Repetir
        leer n
    Hasta Que n>0 & n=trunc(n)
    p<-1
    Para i<-1 Hasta n Con Paso 1 Hacer
        p<-p*x
    FinPara
    Escribir p
FinProceso