Le programme ci-dessous permet la conversion des nombres en binaire, hexadécimal ou décimal sur les Ti83 et Ti82 .

 

"0123456789ABCDEF"→Chaîne2
Lbl K
Menu("CONVERSION","HEX->DEC",F,"DEC->HEX",G,"BIN->DEC",H,"DEC->BIN",J,"FIN",M)
Lbl F
Disp "HEX="
16→B
Goto P
Lbl G
"HEX="→Chaîne4
16→B
Goto Q
Lbl H
Disp "BIN="
2→B
Goto P
Lbl J
"BIN="→Chaîne4
2→B
Goto Q
Lbl P
Input Chaîne1
longueur(Chaîne1)→L
0→A
For(I,1,L)
(carChaîne(Chaîne2,sous-Chaîne(Chaîne1,I,1))-1)→C
C*B^(L-I)+A→A
End
Disp "DEC=",A
Pause
Goto K
Lbl Q
Input "DEC=",A
" "→Chaîne1
While A>B-1
ent(A/B)→Q
A-Q*B→R
Q→A
sous-Chaîne(Chaîne2,R+1,1)+Chaîne1Chaîne1
End
sous-Chaîne(Chaîne2,A+1,1)+Chaîne1Chaîne1
Disp Chaîne4+Chaîne1
Pause
Goto K
Lbl M
Disp "BAC STI2D","M. GAUTHIER","LYCEE SERUSIER","CARHAIX"
Pause
Stop 

Remarques : 

  • la flèche → touche STO;
  • Les fonctions en gras sont dans le catalogue (touche 0).

Vous pouvez télécharger le programme ici.

En poursuivant votre navigation sur mon site, vous acceptez l’utilisation des Cookies et autres traceurs  pour réaliser des statistiques de visites et enregistrer sur votre machine vos activités pédagogiques. En savoir plus.