Напишите программу на языке паскаль к уравнению z=|x-x^n|

Остальную часть кода думаю сам напишешь ^_^
writeln('z= ', abs(x-exp(n*ln(x))) );

P.S Не будет работать если x<0