Что тут за ошибка? Опции

[RabbitRabbit]

Вроде бы все правильно, а компилятор пишет "Повторно объявленный идентификатор "
Почему он повторно объявленый? Вторая ошибка: Необявленная переменная Power. Насколько мне известно это встроенная ф-ция. Так зачем ее объявлять? Что изменить, чтоб код нормально работал?

uses crt;
var x,n:integer;
 
function F(const x, n: Real): Real; //x - вещественное, n - вещественное
var
    Result: Real;
    flag: Boolean;
begin
    flag := (x < 0);
    Result := Exp(n * Ln(Abs(x)));
    if (flag)
    then
        Result := -Result;
    Power := Result;
end;
 
begin
     readln(x,n);
     write('Ответ = ',F(x,n));
end. 

Сообщение отредактировано: RabbitRabbit - 10.10.2016 17:41