Base y exponente

PROGRAM Leccion4Ejercicio14;

VAR
  a, b:real; //Una variable para la base y otra para el exponente
  potencia: real;

  {Una variable para el resultado de la potencia
  La variable potencia no ser°a necesaria en absoluto ya que podemos
  calcular ese valor directamente al mostrarlo en pantalla}

BEGIN
    write('Ingrese  la base y el exponente: ');
    readln (a,b);

    writeln; //Dejo una l°nea en blanco
    potencia:= exp(b*ln(a)); //Calculamos el valor de la potencia
    writeln('El resultado de ',a:1:2 '^',b:1:2,' es: ',potencia:1:2);
END.