0% ont trouvé ce document utile (0 vote)
16 vues1 page

Algorithmes sur les nombres de Mersenne

Transféré par

midzinfo
Copyright
© All Rights Reserved
Nous prenons très au sérieux les droits relatifs au contenu. Si vous pensez qu’il s’agit de votre contenu, signalez une atteinte au droit d’auteur ici.
Formats disponibles
Téléchargez aux formats PDF, TXT ou lisez en ligne sur Scribd
0% ont trouvé ce document utile (0 vote)
16 vues1 page

Algorithmes sur les nombres de Mersenne

Transféré par

midzinfo
Copyright
© All Rights Reserved
Nous prenons très au sérieux les droits relatifs au contenu. Si vous pensez qu’il s’agit de votre contenu, signalez une atteinte au droit d’auteur ici.
Formats disponibles
Téléchargez aux formats PDF, TXT ou lisez en ligne sur Scribd

Exercice 1 : Trouve  Faux ;

Algorithme exo1_1 ; Sinon


Var JJ+1;
N, M, S, I, J : entier ; Fin Si ;
Trouve : booléen; Fin Tant que ;
Debut Si (Trouve) alors
Lire (N); Ecrire (n, ‘est un nombre de Mersenne’) ;
M  N +1; Fin Si ;
S  2; Fin Si ;
I  1; Fin.
Tant que (S < M) faire
S  S * 2; Exercice 2 :
I  I +1; Algorithme Exo2 ;
Fin Tant que; Var
Si (S=M) alors I, M, N, Z, X, Y : entier ;
J 2; Trouve : Booléen ;
Trouve  Vrai ; Début
Tant que (J <= (I div 2)) et (Trouve) faire X 11 ;
Si (I div J = 0) alors Y 13 ;
Trouve  Faux ; Tant que (y <= 99) faire
Sinon I 2 ;
JJ+1; Trouve  Vrai ;
Fin Si ; Tant que (i < Y div 2) et (Trouve) faire
Fin Tant que ; Si (X mod I = 0) ou (Y mod i = 0) alors
Si (Trouve) alors Trouve = Faux ;
Ecrire (n, ‘ est un nombre de Mersenne’) ; Fin Si ;
Sinon I  I+1 ;
Ecrire (n, ‘n’est pas un nombre de Mersenne’) ; Fin Tant que ;
Fin Si ; Si (Trouve) alors
Sinon Ecrire (X , ‘et’, Y, ‘ sont jumeaux’) ;
Ecrire (n, ‘n’est pas un nombre de Mersenne’) ; Fin Si ;
Fin Si ; XX+1;
Fin. YY+1;
Fin Tant que ;
Algorithme exo1_2 ; Fin.
Var
N, M, S, I, J : entier ;
Trouve : booléen;
Debut
Pour N allant de 1 à 99 faire
M  N +1;
S  2;
I  1;
Tant que (S < M) faire
S  S * 2;
I  I +1;
Fin Tant que;
Si (S=M) alors
J 2;
Trouve  Vrai ;
Tant que (J <= (I div 2)) et (Trouve) faire
Si (I div J = 0) alors

Vous aimerez peut-être aussi