convertisseur decimal>binaire |
Auteur |
Message |
Samos
Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
|
Posté le : Jeu 05 Juil 2012, 15:26
|
|
|
Voila un convertisseur decimal>binaire!
L'utilité? bonne question
Code |
Input "DECIMAL=",A
Delvar M
Clrlist L1,L2
Repeat not(iPart(A
M+1->M
iPart(A/2->C
A-2C->B
C->A
B->L1(M
End
//Bon on a le nombre mais il est à l'envers!
dim(L1->dim(L2
For(X,1,dim(L1
L1(X)->L2(dim(L1)+1-X)
End
Pause L2
|
|
|
|
|
blg_flg
Autorisation : Membre
Nb de messages : 661
Inscrit le : Mer 23 Mai 2012, 17:28
|
Posté le : Jeu 05 Juil 2012, 16:04
|
|
|
Tu vas faire un convertisseur binaire>décimal après?
|
|
|
|
Samos
Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
|
Posté le : Ven 06 Juil 2012, 11:23
|
|
|
Un logarithme ? notre professeur de math utilisait ce mot pour nous faire peur cette année
d'après wikipedia
Citer | Le logarithme de base b d'un nombre réel positif est la puissance à laquelle il faut élever la base b pour obtenir ce nombre. Par exemple, le logarithme de mille en base dix est 3, car 1000 = 103. Le logarithme de x en base b est noté logb(. Ainsi log10(1000) = 3. |
Pour les puissances de 10 ça va mais pour les autres nombres
ta version est surement meilleure mais je vais quand même poster mon convertisseur binaire>decimal (d'ailleurs le fait de pouvoir choisir sa base m'a impressioné )
Code |
:ClrList L5,L6
:Input "BIN LIST",L5
:dim(L5)->B:B->dim(L6 // essayé dim(L5)->dim(L6 mais ça a planté
:For(A,1,dim(L5
:L5(A->L6(B-A+1
:End
:ClrList L5
:1->B
:For(A,1,dim(L6
:B->L5(A
:2B->B
:End
:sum(L5L6->B
:Disp B
|
|
|
|
|
EGUL
Autorisation : Membre
Nb de messages : 46
Inscrit le : Lun 02 Juil 2012, 11:40
|
Posté le : Ven 06 Juil 2012, 21:01
|
|
|
Oh le petit niveau . . .
Moi j'en ai un qui convertit n'importe quelle base en n'importe quelle autre
---------------------- En attente des résultats du bac!
Programmeur TI-82 fou
Prêt à aider ceux qui en ont besoin |
|
|
|
Samos
Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
|
Posté le : Ven 06 Juil 2012, 21:13
|
|
|
Pourquoi ne pas le partager toi qui est de si haut niveau!
|
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
EGUL
Autorisation : Membre
Nb de messages : 46
Inscrit le : Lun 02 Juil 2012, 11:40
|
Posté le : Sam 07 Juil 2012, 11:10
|
|
|
Le voici
Code |
EffEcr
0->B
While B<2
Input "BASE NOMBRE?",B
End
0->C
While C<1
Input "NOMBRE DE CHIFFRES?",C
End
0->T
For(D,1,C
EffEcr
Output(3,1,"NUMERO DU CHIFFRE DE GAUCHE A DROITE :
Output(5,8,D
Input "?",A
A*B^(C-D)+T->T
End
Input "BASE CONVERSION?",F
0->E
-1->G
While E<=T
1+G->G
0->H
While E<=T et H<F-1
H+1->H
H*F^G->E
End
End
H-1->H
If H=0
Then
F-1->H
G-1->G
End
H*F^G->E
G+1->I
1->dim(¤BASES ¤ <=> au petit L
EffListe ¤BASES
I->dim(¤BASES
H->¤BASES(1
T-E->T
For(J,1,G
-1->K
0->E
While E<=T
K+1->K
K*F^(G-J)->E
End
K-1->K
K->¤BASES(J+1
T-K*F^(G-J)>T
End
Disp ¤BASES
|
---------------------- En attente des résultats du bac!
Programmeur TI-82 fou
Prêt à aider ceux qui en ont besoin |
|
|
|
Samos
Autorisation : Membre
Nb de messages : 300
Inscrit le : Lun 14 Mai 2012, 18:51
|
Posté le : Dim 08 Juil 2012, 14:51
|
|
|
J'ai essayé ton programme mais il ne fonctionne pas, j'ai du mal recopier quelque part...
Je rentre 10 en base nombre
2 en nombre chiffre
1 en premier chiffre puis 5 en 2eme chiffre
2 en base conversion et la j'obtient
{2,-2,-2,3,1}
D'ailleurs je ne comprend pas le principe
|
|
|
|
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Mar 10 Juil 2012, 1:23
|
|
|
Citer : EGUL | Oh le petit niveau . . .
Moi j'en ai un qui convertit n'importe quelle base en n'importe quelle autre |
Moi aussi j'ai fait mieux mais attention à la manière de le dire car cela peut être blessant pour les débutants. (même si malheureusement je sais pas avec certitude la meilleure manière de l'aborder)
Si j'avais été le débutant de ce sujet j'aurais été blessé j'immagine.
Tant que nous sommes là, je poste mon programme le plus récent (au moment où je poste ceci) de conversion de bases. http://tout82.free.fr/forum/sujet.php?sujet=1745
Code | "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZÁ"üStr1
Input "BASE=",X
Input "VERS=",Y
Input "X=",Str2 // saisir nombre en chiffres et lettres, comme hexadécimal
length(Str2üN
0üP
For(W,0,N-1 // Conversion de base quelconque à 10
inString(Str1,sub(Str2,N-W,1))-1
P+Ans*X^WüP
End
If not(P
Stop
Lbl R
PüZ // Si vous supprimmez le menu restart (et ce qui suit), vous pouvez ...
" "üStr2 //... supprimmer cette ligne et remplacer Z par P
Repeat Q=0 // Conversion de base 10 à quelconque
iPart(Z/YüQ
Z-YQüR
QüZ
sub(Str1,R+1,1)+Str2üStr2
End
Pause Str2
Menu("RESTART","STOP",Q,"RECONVERTIR",S
Lbl S
YüX
Input "RECONV=",Y
Goto R
Lbl Q |
Si on veut traiter correctement les bases au delà de 36, et plus généralement d'une manière similaire à EGUL, il est préférable d'utiliser ce programme (également de moi) :
Code | Input "BASE=",X
Input "VERS=",Y
Input L1 // saisir une liste, par exemple {8,12,3 pour dire 8C3 en base 16
0üP
dim(L1üN
For(W,1,N // conversion de la liste en base quelconque vers nombre décimal
P+L1(W)X^(N-WüP
End
If not(P
Stop
Lbl R
PüZ // même remarque que pour l'autre prog
DelVar W
ClrList L1
Repeat Q=0 // conversion du nombre vers liste dans une base quelconque
W+1üW
iPart(Z/YüQ
Z-YQüL1(W
QüZ
End
L1üL2
For(V,1,W // retourner la liste pour avoir les chiffres dans le bon ordre
L2(W+1-VüL1(V
End
ClrList L2
Pause L1
Menu("RESTART","STOP",Q,"RECONVERTIR",S
Lbl S
YüX
Input "RECONV=",Y
Goto R
Lbl Q |
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
|
|
|
The K
Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
|
Posté le : Lun 16 Juil 2012, 14:43
|
|
|
Le meilleur que j'ai vu jusque la est celui de mdr1 dans le tuto dans ma signature. À côté du sien, on est tous des petits joueurs ici ...
---------------------- La la la ...
Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO
Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind
Mes nouveaux programmes de calcul formel : FCarré FPrime
Projet base de données : ici mais abandonné. Trop de travail ... |
|
|
|
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Lun 16 Juil 2012, 19:37
|
|
|
Mon programme est (presque) aussi bien que le sien : convertisseur de mdr1.
-----
EDIT: il a optimisé son programme encore plus que dans mes derniers souvenirs, donc il demeure finalement bien plus léger que le mien.
De plus je n'avais pas à l'époque compris le but d'absoluement toutes ses astuces.
Cependant,
Mon programme occupe 265 octets de base.
Si j'enlève mes options, j'arrive à 189 octets.
Et mdr1 occupe 184 octets
Il me bat avec l'usage de Ans, une astuce avec inString, et une meilleure gestion des variables.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
|
|
|
The K
Autorisation : Membre
Nb de messages : 878
Inscrit le : Sam 15 Oct 2011, 11:07
|
Posté le : Lun 16 Juil 2012, 20:11
|
|
|
Hé ouais
---------------------- La la la ...
Avez-vous pensé à regarder le manuel avant de demander conseil ? Un manuel est fait avant tout pour être consulté : MANUEL
Un problème de programmation ? Allez consulter ce tutoriel crée pour cela : TUTORIEL PROGRAMMATION
Vous avez un problème avec l'ordinateur avec votre calculatrice ? SOLUTION EN VIDEO
Mes programmes sur le site : Produit scalaire KMorpion Puissance 4 Mastermind
Mes nouveaux programmes de calcul formel : FCarré FPrime
Projet base de données : ici mais abandonné. Trop de travail ... |
|
|
|
rossj
Invité
|
Posté le : Dim 22 Sep 2013, 10:07
|
|
|
comment vous faite pour trouver ClrList et Delvar sur la machine" ti 82" ? merci
|
|
|
|
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Dim 22 Sep 2013, 11:14
|
|
|
Bonjour,
DelVar est dans l'onglet "prgm".
Tu peux l'utiliser à la place de ClrList.
---------------------- Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
|
|
|
linkakro
Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
|
Posté le : Dim 22 Sep 2013, 12:26
|
|
|
... et ClrList est dans le menu [stat].
Je suis contre l'usage de DelVar sur les listes, car cela pertube l'éditeur de listes, mais chacun fait comme il veut.
Ma signature donne le catalogue de toutes les fonctions.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
Pour tout le monde et surtout les débutants, quelques-uns des articles courants :
*Traductions Algorithmie/Ti-Basic.
*Caractères spéciaux sur Tout82
Les défauts du TI-Basic : Goto_versus_algo et DelVar/End/Lbl/guillemet/store |
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|
pito2901
Autorisation : Membre
Nb de messages : 107
Inscrit le : Sam 20 Avr 2013, 15:43
|
Posté le : Jeu 24 Oct 2013, 16:11
|
|
|
Cependant ld, tu as écris:
Citer | Convertir E7B6 (Base 16) en décimal (Base 10).
-> Menu -> "X à 10" -> X=? 16 -> N=? E7B6 -> Entrer. On a 14262 |
Et le résultat est (59318)10.
----------------------
visitez ma page ti82stats.fr
|
|
|
|
Dragarta
Invité
|
Posté le : Sam 13 Jui 2015, 16:31
|
|
|
Salut, comment on fait le ¤ sur une ti82 stat ??
|
|
|
|
Mingerton
Autorisation : Membre
Nb de messages : 504
Inscrit le : Ven 07 Déc 2012, 20:09
|
Posté le : Sam 13 Jui 2015, 16:51
|
|
|
Où vois tu ce caractère ?
Si tu parles du ü, c'est une convention du forum pour la touche sto (sor ton clavier). Si tu passes ta souris dessus tu verras même la touche.
---------------------- Mes articles
Mes programmes en ligne (je termine peu de projets)
Guide traduction Algo-Basic, par Linkakro
Catalogue des fonctions 82/83/84 FR/EN |
|
|
|
ld
Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
|
Posté le : Dim 14 Jui 2015, 12:27
|
|
|
"¤" est ici le petit "L" des listes que tu trouveras dans le catalogue sous "jed("
---------------------- Note Éphéméride Chrono Bombrman BlueFishEncryptor Labygénérateur Nord BandeauDeTexte LunarPhase Syracuse Papy-Jump Convertisseur ! SolveurDeSudoku VérificateurDeCodesBanquaire PrgmADiviser CryptageDeVigenere MiniSolv Reed-Solomon Code128Géodésie |
|
|
|
Razteck
Invité
|
Posté le : Jeu 17 Sep 2015, 21:26
|
|
|
Vous étes nul il y a aucun programme qui ne fonctionne jusqu'au bout. Toujours des erreur à corriger. La moindre des chose quand on poste des programmes c'est de vérifier qu'ils marchent.
|
|
|
|
m@thieu41
Autorisation : Membre
Nb de messages : 856
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Ven 18 Sep 2015, 18:43
|
|
|
La moindre des choses quand on est debile c'est de s acheter un cerveau, ou au moins de faire semblant.
---------------------- Pour vous aidez dans vos débuts (et même ensuite ^^) :
*Tuto Algo->Ti Basic (par Linkakro) : Traduisez vos algo (de type algobox) en prgm pour votre TI!
*Catalogue des emplacements et traductions (anglais/français) des fonctions sur la TI.
*Faites vos propres programmes de maths (par ash)
Et au fait: la politesse n'a jamais tué personne |
|
|
|
Google_AdSense
|
Publicité
|
|
|
|
|