Нахождение остатка от деления, от большого числа

[Bilymo]

Здравствуйте дорогие форумчане!!! Дело в том, что при возведении числа в большую степень(число в степени 512) и нахождения остатка от деления приводит к ошибке: Invalid floating point operation.

<...>
var
k,q,l,ff,k1:longint;
  w,u:extended;
  x1:extended;
 
//x1:=1111; k1:=512;
 
     w:=trunc(exp(ln(x1)*k1)) mod 931; //round пробовал, то же не помогает :(
     form1.Memo4.Lines.Add(inttostr(w));

[Аватар]

Ух ты, 1111^512 это число примерно с 1500 нулями. Нетрудно сообразить, что результат ни в какой extended не уместится. Только реализация длиной арифметики

[northener]

Ух ты, 1111^512 это число примерно с 1500 нулями

Самое смешное, что в результате всего этого безобразия нужен остаток от деления на мизерное 931.

[Utkin]

Остаток от деления какого числа на какое?

[evg_m]

mod(a*b,x) =mod(mod(a,x) *mod(b,x), x)
остаток произведения =произведение остатков (почти!)