Poster un nouveau sujet Poster une réponse Page: 1,      >>
programme binaire -> décimal
Auteur Message
madmax56200



Autorisation : Membre
Nb de messages : 1
Inscrit le : Ven 28 Sep 2007, 20:26
Posté le : Ven 28 Sep 2007, 20:43   Citer 

Voilou un petit programme pour convertir du binaire en décimal, dévellopé pour les cours de SI ^^^.

Code

EffEcr
Input X
EffEcr
0->R
Output(3,3,"-CHARGEMENT-")
For(Y,0,16)
16-Y->Z
(ent(Y/10^Z))->C
C*2^Z->B
Output(4,3,"]")
Output(4,ent(Y/2)+4,"-")
Output(4,13,"[")
R+B->R
X-C*10^Z->X
End
Output(5,1,R)



 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Ven 28 Sep 2007, 21:11   Citer 

amusant ce petit programme happy.gif ...

sinon tu pourrais essayer de faire binaire => hexa (par contre ça risque d'être un peu plus compliqué :p ...)

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Sam 29 Sep 2007, 12:41   Citer 

Surtout qu'il faudrait des chaînes, et donc une stats minimum.

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Sam 29 Sep 2007, 15:15   Citer 

Admettons que tu prennes deux chiffres pour un ( 01 02 03 04 05 ... 14 15 16), tu dois peut-être arriver à l'adapter sur 82.

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
beber
Invité
Posté le : Jeu 15 Nov 2007, 21:57   Citer 

lorsque je met une serie de 0 et de 1 le resultat est toujours 18?

  Haut de page Bas de page 
 
coc5
Avatar

Autorisation : Membre
Nb de messages : 891
Inscrit le : Sam 16 Jui 2007, 13:37
Posté le : Sam 17 Nov 2007, 16:59   Citer 

normalement non pourquoi ?

----------------------
Ne cliquez pas ici !
 Adresse email Haut de page Bas de page 
 
beber
Invité
Posté le : Lun 19 Nov 2007, 13:19   Citer 

j'ai verifier plusieurs fois et je trouve pas ou je me suis tromper

  Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Lun 19 Nov 2007, 18:12   Citer 


Code
R+B->R



ce serait pas ici par hasard ?

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
beber
Invité
Posté le : Jeu 22 Nov 2007, 20:19   Citer 

sa bug toujours c chian

  Haut de page Bas de page 
 
Ratuss



Autorisation : Membre
Nb de messages : 1561
Inscrit le : Mer 01 Mar 2006, 20:41
Posté le : Lun 26 Nov 2007, 21:24   Citer 

=> C'est quasi obligé que tu te sois trompé dans le code (inversement d'une lettre ou qqchose du genre...)

----------------------
--- LISTE DES JEUX POUR TI ---
 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
bishonours
Avatar

Autorisation : Membre
Nb de messages : 3
Inscrit le : Ven 18 Jan 2008, 19:28
Posté le : Ven 18 Jan 2008, 19:36   Citer 

bonjour !!! J'ai un ptit soucis !
jene trouve pas les commandes suivante sur ma calculette :

-EffEcr
-ent

Ce petit programme pourrais mettre utile vu que j'arrive pas trop à passer du binaire à l'hexadécimal ^^'

----------------------
ma ptite passion => http://dark-bishonours.deviantart.com/
=D
 Adresse email Haut de page Bas de page 
 
Sangohan38



Autorisation : Membre
Nb de messages : 3370
Inscrit le : Sam 31 Déc 2005, 19:48
Posté le : Ven 18 Jan 2008, 19:49   Citer 

Ta calculette doit être en anglais.
Pour plus d'info, regarde les traductions dont tu trouver le lie dans ma signature.
Sinon, c'est PRGM + droite + 8 pour EffEcr
Et pour ent( c'est MATH+ droite + 5.

Sangohan38

 Adresse email Haut de page Bas de page 
 
timmit



Autorisation : Membre
Nb de messages : 27
Inscrit le : Sam 19 Déc 2009, 18:11
Posté le : Lun 21 Déc 2009, 11:49   Citer 

est ce que c'est normal de trouver toujours 18 comme reponse!!
j'ai relu et je n'ai pas trouver d'erreur

 Adresse email Haut de page Bas de page 
 
timmit



Autorisation : Membre
Nb de messages : 27
Inscrit le : Sam 19 Déc 2009, 18:11
Posté le : Lun 11 Jan 2010, 13:29   Citer 

toujours aucune soltution??

 Adresse email Haut de page Bas de page 
 
invité
Invité
Posté le : Jeu 14 Jan 2010, 18:42   Citer 

vos flèches -> se font avec le moins et le superieur à ?!

  Haut de page Bas de page 
 
linkakro



Autorisation : Membre
Nb de messages : 3767
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Jeu 14 Jan 2010, 20:06   Citer 

Ne remonte pas des topics pour des questions HS ! Recherche ou pose la question dans un topic neuf.
Non c'est la touche [sto]


quant à timmit : ce programme est tellement optimisé que je ne sais pas qu'est-ce qui peut clocher. Le plus gros hic c'est que tu n'es pas le seul.

----------------------
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
 Adresse email Haut de page Bas de page 
 
Rézus



Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Jeu 14 Jan 2010, 21:06   Citer 

Déjà je vois pas à quoi sert l'avant avant dernière ligne,ou alors il faut remplacer R par X dans la dernière mais ça ne marche pas.Il doit manquer une ligne juste avant le End,mais j'ai pas le temps d'y réfléchir.

Et les -> se font avec la touche [sto] au dessus de [on].

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
Rézus



Autorisation : Membre
Nb de messages : 853
Inscrit le : Sam 20 Jui 2009, 20:35
Posté le : Ven 15 Jan 2010, 18:07   Citer 

Bon,pour pas rester sur une mauvaise fin,j'ai fait un programme binaire -> décimal.

Code
:0->N:0->Z
:Input X
:For(N,1,9E99
:X/10->X
:If partEnt(X)=0
:Goto 2
:End
:Lbl 2
:X*10^N->X
:For(Y,1,N
:Z+partEnt(10partDéc(X/10^Y)*2^(Y-1))->Z
:End
:Disp Z



 Adresse email Haut de page Bas de page 
 
Mouss



Autorisation : Membre
Nb de messages : 1
Inscrit le : Jeu 11 Mar 2010, 22:26
Posté le : Jeu 11 Mar 2010, 22:28   Citer 

Salut la compagnie je post un peu plus tard mais bon c'est pas grave :p
Voila, je suis en seconde et comme je m'ennuyait en cours de math ben j'ai fait vos 2 petits programmes pour transformer le binaire en base 10 et la base 10 en binaire !! J'ai tester il marche ! par contre la programme base 10 -> binaire, lorsque l'on entre un nombre supérieur à 1024 le résultat seras en écriture scientifique ! je ne peux pas faire mieux ^^

Bref passons aux programmes !!

Citer
Base10->binaire

:Input "X=",X
:0->A
:1->B
:0->Z
:While X>ou=1 (il n'y a pas sur l'ordi ce signe la ^^)
:If partDéc(X/2)
:Then
: (X-1)/2->X
:Z+10^A->Z
:A+1->A
:Else
:X/2->X
:A+1->A
:End
:End
:Disp Z






Et enfin,

Citer
le Binaire en base 10

:Disp "NOMBRE BINAIRE"
:Input "X=",X
:1->A
:0->Y
:While X>ou=1
:If partDéc(X/10)
:Then
:A+Y->Y
: (X-1)/10->X
:A*2->A
:Else
:X/10->X
:A*2->A
:End
:End
:Disp Y




Voila !! en espérant de vous avoir été utile =)

PS : pour ceux qui ne trouverait pas certain terme, cherche le dans le catalogue
vous ouvrirez le catalogue en faisant :
Shift(ou 2nde) + 0
Tout les termes existant de la calculette y sont mit par ordre alphabétique winkle.gif
A la revoyure !!! (et si j'ai écrit un peu en retard c'est pour ne pas rester sur une mauvaise fin crazy.gif )
MOUSS

 Adresse email Haut de page Bas de page 
 
Google_AdSense



Publicité    



 
ld
Avatar

Autorisation : Membre
Nb de messages : 373
Inscrit le : Jeu 23 Sep 2010, 16:05
Posté le : Lun 29 Nov 2010, 11:47   Citer 

Excuser moi de faire resurgir un vieux sujet de la 11ème page du forum,
mais j'aurais besoin de ce prgm. moodforlove.gif
J'en est déjà fait un pour convertir les décimal en binaire mais pas l'inverse.
Ce prgm est censé le faire mais il ne fonctionne pas, au secours ! frozen.gif

----------------------
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
 Adresse email Haut de page Bas de page 
 
Poster un nouveau sujet Poster une réponse Page: 1,      >>





  Powered by Fire-Soft-Board v1.0.10 © 2004 - 2024 Groupe FSB
Page générée en 9 requêtes
BlackOne par Grimmlink