Paso 8: binario
Aquí es un programa que puede convertir a números normales en números binarios. Échale un vistazo:: A Lbl
: ClrHome
: Input "Número", A
: If A < 0:Goto A
: 12 -> X:0-> Z
: Mientras 1
: X - 1 -> X:A - 2 ^ X -> B
: If B < 0:End
: Z + 10 ^ X -> Z
: If B = 0:Goto Z
: B -> A
: Final
: Z Lbl
: Disp "número binario", Z
: Pausa
: ClrHome
: Menu("ANOTHER NUMBER?","YES",A,"NO",B
: B Lbl
¿Qué hace?
Este programa es un programa bastante pequeño, pero funciona perfectamente bien. Lo único que hace es pedir un número, y, una vez que se ingresa, calculará es binarios gemelos. Es bastante simple. Si se desea, puede averiguar cómo funciona exactamente con algún apuesto. Hay sólo una cosa quiero destacar: usted debe no ingresa un número mayor entonces 1024, porque entonces el sistema utilizará la notación científica el número binario, que hará que el programa a ser inexacta.
