Calcul dune exponentielle modulo pour rsa

salut

pour un projet dans mon ecole je dois coder la methode de cryptage rsa

pour cela je dois calculer une exponentielle modulo de la forme
a^e mod n

voici l'algorithme que j 'utilise

j<-1
k<-0
tant que k < e faire
|j<-j * a
|j<-j mod n
|k<-k + 1
résultat j

le probleme c'est qu'il ne marche pa tout le temps quand e et n sont trop grand ...

qqun aurait t'il un autre algo ou une amélioration de celui ci??
merci bcp

tib