Дано n = 8. вычислить n-ое значение переменной z.

Если я правильно понял условие, то программа ниже :

program bipovskiychertilo;var z,c,n:real;beginn:=8;write('Введите нужное z : ');read(z);c:=exp(ln(z)*n);writeln('ответ: ',c);end.