Passer au contenu

Excel 97 et suivant : dresser une liste de nombres premiers

Si vous aimez les jeux mathématiques, vous avez sans doute besoin de temps à autre d’utiliser des nombres premiers, ces nombres particuliers qui ne sont divisibles…

Si vous aimez les jeux mathématiques, vous avez sans doute besoin de temps à autre d’utiliser des nombres premiers, ces nombres particuliers qui ne sont divisibles que par 1 et par eux-mêmes. Vous pouvez parfaitement en établir une
liste (finie, bien sûr…) dans Excel à l’aide d’une macro.A partir d’une liste initiale de quatre nombres premiers (2,3, 5 et 7), la macro utilise l’algorithme classique de recherche des nombres premiers : elle teste une valeur (la variable AA dans notre exemple) en la
divisant par tous les nombres premiers de la liste jusqu’à ce que le quotient obtenu devienne inférieur au diviseur. Si aucune division ne tombe juste, la valeur est un nombre premier. Elle est donc ajoutée à la liste.La macro augmente la valeur de deux unités (à partir de 3, les nombres premiers sont toujours impairs) et la boucle recommence. Avant de créer la macro, inscrivez les chiffres 2,3, 5 et 7 respectivement dans
les cellules A1, A2, A3 et A4.Tapez Alt + F11 pour ouvrir l’éditeur Visual Basic. Déroulez Insertion, Module et tapez le listing ci-dessous. Déroulez ensuite Fichier, Fermer et retourner à Microsoft Excel.Pour lancer la macro, tapez Alt + F8, sélectionnez Premier et cliquez sur Exécuter.Attention : la macro ne s’arrête jamais, c’est une boucle infinie. Pour l’interrompre, tapez Ctrl + Pause (la touche Pause/Attn est en haut à droite du clavier) et cliquez sur Fin. Le
processus est assez rapide : sur un PC équipé d’un Pentium 4 cadencé à 3 GHz, la macro, en ‘ tournant ‘ pendant cinq minutes, a donné tous les nombres premiers jusqu’à 148 331 !

🔴 Pour ne manquer aucune actualité de 01net, suivez-nous sur Google Actualités et WhatsApp.


La rédaction