Differenze tra le versioni di "Rappresentazione esadecimale di un dato a lunghezza variabile"
Da Gambas-it.org - Wikipedia.
(Nuova pagina: Verrà mostrato un algoritmo per ottenenre la rappresentazione esadecimale di un dato a ''lunghezza variabile''. ''<Font Color= #006400>' Gambas class file''</font> '''Public''...) |
|||
Riga 1: | Riga 1: | ||
− | Verrà mostrato un algoritmo per | + | Verrà mostrato un algoritmo per ottenerne la ''rappresentazione'' esadecimale di un dato a ''lunghezza variabile''. |
Versione delle 16:15, 14 gen 2012
Verrà mostrato un algoritmo per ottenerne la rappresentazione esadecimale di un dato a lunghezza variabile.
' Gambas class file Public Sub Form_Open() Dim a, b, c As Integer c = InputBox("Immetti un numero in forma decimale:") b = c Mod 128 c = CInt(c / 128) While c > 0 a = c Mod 128 a = a Or 128 c = CInt(c / 128) ' valori mostra i finali: Print Hex(a), Hex(b, 2) Wend End