Реализации алгоритмов/Метод Лемана: различия между версиями

Содержимое удалено Содержимое добавлено
необходимо, чтобы gcd > 1, тк иначе алгоритм ничего никогда не вернет
Строка 33:
dd := GCD(A-B, N);
 
if (1 <> dd) and (dd < N) then begin
Result := dd;
exit;