simplification calcul puissance et modulo
Bonjour à tous, je vous expose mon problème :
je souhaite effectuer le calcul suivant : (nbcode^E mod(N)) et le pb est que lorsque les valeurs de a ou b (integer) sont trop élevé Delphi sature.
J'essaye donc de me servir des calculs de simplification des modulo
Voila ce que j'ai programmé :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
| While E<>1 do
begin
If not Odd(E)
Then
Begin
nbcode:=(puissance (Nbcode,2))mod N ;
E:=E div 2;
end
Else
Begin
nbcode:=((puissance (Nbcode,2)mod N)*aux)mod N;
E:=E div 2;
End;
end; |
Mais malheureusement ça ne marche pas
It doesn't work
Aidez moi SVP
merci d'avance