Как возвести X^Y в степень в Delphi

[Doni11]

Var
a,f,n:integer;

begin

a:= StrToInt(edit1.Text);
f:= StrToInt(edit2.Text);


Edit3.Text:= StrToInt(exp(f*ln(a)));



end;

end.

выдает ошибку вот тут

Edit3.Text:= StrToInt(exp(f*ln(a)));

[BDA]

Ну так функция Exp возвращает явно не строку

[Doni11]

Сообщение от BDA

Ну так функция Exp возвращает явно не строку

Не понял) Если честно

Это Delphi

[BDA]

StrToInt преобразует строку в число, а функция Exp возвращает число.

[min@y™]

Edit3.Text:= FloatToStr(exp(f*ln(a)));

[Doni11]

Сообщение от BDA

StrToInt преобразует строку в число, а функция Exp возвращает число.

Я не догоняю

[Вадим Мошев]

Edit3.Text хочет строку, а вы ему даёте действительные числа.
Используйте функцию floatToStr или лучше FloatToStrF: http://www.delphibasics.ru/FloatToStrF.php

[Аватар]

Я не догоняю

А чего радуешься?

[Doni11]

procedure TForm1.Button1Click(Sender: TObject);

Var
a,f,n,d:integer;

begin

a:= StrToInt(edit1.Text);
f:= StrToInt(edit2.Text);

d:= exp(a*ln(f));
Edit3.Text:=Floattostr(d);



end;

end.

вс ровно ошибку выдает

[Doni11]

Сообщение от Аватар

А чего радуешься?

Я не радуюсь
Туплю на простом