Придумайте программу в паскаль abc для вычисления следующей величины: 1+а+а^2+k+a^k а и к пользователем.

var n,k:real;
begin
readln(n,k);
writeln(sqr(n)+k+exp(ln(n)*k)+n+1);
end.

Функция exp(ln(n)*k) возводит число n в степень k