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

==> 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    
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

(C) Laurent - autourdupc.com -

Création le 13 mars 2004
Mise à jour le 13 mars 2004.