[Athen]

почему выдает ошибку: Operator not applicable to this operand type?

Код:

procedure TForm1.Button2Click(Sender: TObject);
var
  P,G,X,K,M,a,b,Y:integer;
begin
P:=strtoint(Edit1.Text);
G:=strtoint(Edit2.Text);
X:=strtoint(Edit3.Text);
K:=strtoint(Edit5.Text);

if ((P>G)and(X<P))and((K<(P-1))and(K>1)) then
 begin
  Y:=exp(X*ln(G)) mod P;  // на этой строке ошибка!
  Edit4.Text:=inttostr(Y);
 end
else
messagebox(0, pchar('Вы ввели значения неправильно! P>G, X<P и 1<K<P-1'),pchar('ВНИМАНИЕ!'),mb_iconinformation+mb_ok);
end;

всю голову сломала, все типы данных перепробовала! что-то не так с mod скорее всего...