NOMBRES PARFAITS
Contents
1. NOMBRES NOMBRES PARFAITS Probl me Trouver des nombres parfaits On appelle nombre parfait tout entier naturel x dont la somme des diviseurs est gale 2x ES ST innige On utilise la r gle d Euclide Si un nombre x s crit 2 2 1 et si le facteur 2 1 est premier alors x est un nombre parfait Pour k variant de 2 e On g n re un nombre a 2 1 1 Si a n est pas premier alors on reprend pour le k suivant sinon a est premier on calcule x 2k 21 1 et on affiche On reprend pour le k suivant Fin de si On lance le programme principal N PARFAI HOMERES PARFAITS SEE 22292606 La calculatrice n est plus capable d afficher E 1 37435651 3E 11 en entier le nombre trouv Ce n est donc a plus la peine de poursuivre les calculs Presser AC pour sortir du programme caso NOMBRES PARFAITS N PARFAI Prog F CirTexta NOMBRES PARFAITS 64 O1 For 2 K To 204 O IN PARFAIT O1 NOMBRES PARFAITS O 64 Lbl 94 K 1 Ka K lt 20 Goto 24 7 F l N le O O O 2 gt Ka O 2A K 1 1 gt A4 iO Lbl 24 O A gt Z 2A K 1 1 gt A I O 2Na IO A gt Z4 o Frac A N 0 gt Goto 94 O 2 Na 3 N4 Frac A N 00Goto 94 Frac A N 0 Goto 9 z 3 gt N i O 52N 2M 2 gt J4 O Frac A N 0 Goto 94 O Lbl 04 O I 5 gt N 2 M 2 gt J4 O Frac A N 0 6oto 94 O Lbl O4 O N M Na O Frac A N 0Go2. to 94 HE N M gt Nu M J Ma 2 I J J4 1 N lt fA Goto 04 M J Ma O Zx2AK4 O N lt VAsGoto 0 Oi Lbl 94 O Zx2A K4 O Next O O FI g En prenant x un des nombres parfaits trouv s v rifier que la somme des diviseurs de x soit gale 2x On lance FACT 1P ou FACT 1 On lance L DIVIS2 HOMBRE Ans SERRE l A 4 3 gt 7 j 5 16 Ia 2048 13 U09E 14 WETEN g 15 16382 On calcule directement en MODE RUN IE 32764 LR Us ridt re 32550336x2 one rIidt re eul 8 1BEE HOMBRE 25 1 61E7 SERRE 26 Done JIDAJ F E CEA A EEN E FIH
Download Pdf Manuals
Related Search