| Conversion binaire |
| Auteur |
Message |
Mingerton
Autorisation : Membre
Nb de messages : 504
Inscrit le : Ven 07 Déc 2012, 20:09
|
Posté le : Mar 26 Nov 2013, 18:50
|
|
|
Entre deux heures de cours j'ai programmé ce petit truc pour convertir un nombre du système classique en système binaire (ex : 9 donne 1001). Le code m'a l'air bon, mais je suis pas super doué pour voir où est l'erreur qui l'empêche de fonctionner correctement. Je le donne, et si vous voulez chercher, bonne chance. J'y travaille :
| Code | : Prompt A
: 0->Y
: ClrHome
: While E (supérieur ou égal) R
: iPart(A/2->E
: A-2E->R
: Output(1,Y,R
: E->A
: Y+1->Y
: End |
-> flèche sto
---------------------- 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 |
 |
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 848
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 26 Nov 2013, 19:07
|
|
|
Bonjour,
Déjà en utilisant un affichage direct, tu te limite à 16 chiffres, et donc au nombre 65535 au maximum.
Ensuite: il faut lire les restes obtenus dans l'ordre inverse, donc les afficher en conséquence:
Output(1,16-Y,R
Enfin: ta condition de sortie est éronée: il faut tourner tant que le résultat de la division n'est pas null, soit tant que A n'est pas nul. Là tu teste si E>=R ce qui sera toujours vrai (puisque E est positif ou null et que R vaut 1 ou 0).
| Code | : Prompt A
: 1->Y
: ClrHome
: While A
: iPart(A/2->E
: A-2E->R
: Output(1,16-Y,R
: E->A
: Y+1->Y
: End |
Voilà ça devrait marcher (pas testé)
---------------------- 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  |
 |
|
| |
Mingerton
Autorisation : Membre
Nb de messages : 504
Inscrit le : Ven 07 Déc 2012, 20:09
|
Posté le : Mar 26 Nov 2013, 19:12
|
|
|
Merci beaucoup ! J'avais totalement zappé l'ordre inverse, bête erreur. En tout cas ça marche !
---------------------- 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 |
 |
|
| |
Google_AdSense
|
Publicité
|
|
|
|
| |
m@thieu41
Autorisation : Membre
Nb de messages : 848
Inscrit le : Mer 18 Juil 2012, 18:44
|
Posté le : Mar 26 Nov 2013, 19:42
|
|
|
Ok super ^^
Si ça t'intéresse, tu peux regarder d'autres techniques plus poussées existent et permettent de passer de n'importe quelle base à n'importe quelle autre:
https://web.archive.org/web/20140901101450/https://fr.openclassrooms.com:443/informatique/cours/apprenez-a-programmer-en-ti-basic/le-code-complet-10
---------------------- 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  |
 |
|
| |
Mingerton
Autorisation : Membre
Nb de messages : 504
Inscrit le : Ven 07 Déc 2012, 20:09
|
Posté le : Jeu 28 Nov 2013, 19:09
|
|
|
J'irai voir. J'ai modifié le premier code, avec l'ordre inverse inutile que Y soit égal à 1
---------------------- 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 |
 |
|
| |