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

[Аватар]

Дык рожицы смеющиеся изобразил. Объяви d как real

[Doni11]

Сообщение от min@y™

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

Спасибо большое

[min@y™]

Туплю на простом

ну хорош тупить-то, ёмаё!
какой тут нах integer? Чо у тя все числа целые-то, проффесор?
выкинь переменную d.

Спасибо большое

СЛАВА МНЕ!

[Doni11]

Сообщение от min@y™

ну хорош тупить-то, ёмаё!
какой тут нах integer? Чо у тя все числа целые-то, проффесор?
выкинь переменную d.

Real поставить ?

[min@y™]

Real поставить ?

double.
и замени StrToInt() на TryStrToFloat().
Это позволит не только возводить вещественные числа в вещественные степени (12,3^4,56), но и контролировать ошибки ввода исходных данных.

[Doni11]

Сообщение от min@y™

double.

Var
a,f,n:double;

begin

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


Edit3.Text:= FloatToStr(exp((f-1)*ln(a)) mod n);



end;

посмотри Это правильно написал

[min@y™]

посмотри Это правильно написал

is a question?
no.

[type_Oleg]

Переменная d должна быть не Integer , а например Real

По крайней мере d , а лучше и все остальные.

PS. А, уже объяснили.

Кстати, а что функцию Power запретили использовать ?

[Doni11]

Сообщение от min@y™

is a question?
no.

Yes, is a question.

[min@y™]

Как звучит оригинал задания?