Сообщение от Igor
Не надо стрелять из пушек по воробьям
Эта функция для вычисления небольшой положительной степени
|
Вот так вообще писать не стоит. Во-превых, читаем хелп, в MP есть функция
Pow для возведения чисел в степень.
Returns the value of 'a' raised to the power of 'b'.
function Pow(a, b: real):real;
Во-вторых, если уж совсем "приспичит" написать свою функцию, то тогда так:
function pow(a:real;n:real):real;
begin
pow:=exp(log(a)*n);
end;
Функция MP, кстати, так и работает.