TI57/58/59

Nombre premier

Listing de programmation pour les calculatrices TI57/58/59 afin de déterminer si un nombre est premier.

Présentation

Ce programme permet de tester un nombre pour savoir s'il est premier.
Pour tests, le nombre 1247689 n'est pas premier. Il est divisible par 1117. Le calcul a duré 14 heures et 31 minutes !

Utilisation

• Taper le nombre puis GTO 9 puis R/S

==> Si le nombre est premier, l'affichage indique alternativement le nombre et 1, sinon il alterne le nombre et son premier diviseur trouvé.

Listing

Affichage Touches 00 33 0   RCL 0 01 45   02 33 1 RCL 1 03 85     = 04 -49   2nd INV Int 05 19   2nd C.t 06 66   2nd x = t ? 07 51 1   GTO 1 08 33 1   RCL 1 09 23     x² 10 22   x t 11 33 0 RCL 0 12 -76   2nd INV x t 13 51 2   GTO 2 14 02     2 15 34 1   SUM 1 16 71     RST 17 86 9 2nd Lbl 9 18 19   2nd C.t 19 32 0   STO 0 20 45     21 02     2 22 32 1 STO 1 23 85     = 24 -49   2nd INV Int 25 66   2nd x = t 26 51 1   GTO 1 27 03     3 28 32 1   STO 1 29 15   CLR 30 71     RST 31 86 1 2nd Lbl 1 32 33 0   RCL 0 33 36   2nd Pause 34 31 1   RCL 1 35 36   2nd Pause 36 51 1   GTO 1 37 86   2nd Lbl 2 38 33 0   RCL 0 39 36   2nd Pause 40 01     1 41 36   2nd Pause 42 51 2 2nd GTO 2

Ce programme n'est pas protégé par Copyright. Auteur : Laurent BONNIN

Début de page  |  Sommaire du thème  |  Page d'accueil  |  Me contacter