Étape 8: binaire
Voici un programme qui peut transformer les nombres normaux en nombres binaires. Vérifiez-le dehors :: A Lbl
: ClrHome
: Entrée « Nombre », A
: If A < 0:Goto A
: 12 -> X:0-> Z
: Tout en 1
: X - 1 -> X:A - 2 ^ X -> B
: If B < 0:End
: Z + 10 ^ X -> Z
: If B = 0:Goto Z
: B -> A
: Fin
: Z Lbl
: Disp « nombre binaire », Z
: Pause
: ClrHome
: Menu("ANOTHER NUMBER?","YES",A,"NO",B
: B Lbl
Que fait-elle ?
Ce programme est un programme assez petit, mais il fonctionne parfaitement bien. Il ne fait que vous demander un numéro, et, une fois qu’il est entré, il calculera que c’est jumeaux binaire. C’est assez simple. Si vous le souhaitez, vous pouvez trouver comment cela fonctionne exactement avec une bonne recherche. Il n’y a juste une chose j’ai besoin de faire remarquer : vous devez saisir un nombre supérieur puis 1024, car alors le programme utilise la notation scientifique pour le nombre binaire, ce qui provoquera le programme pour devenir inexacte.