Arrotondare un Intero al più prossimo valore inferiore multiplo di 2, 4, 8, 16, 32 e 64
Da Gambas-it.org - Wikipedia.
Versione del 30 set 2016 alle 18:01 di Vuott (Discussione | contributi) (Creata pagina con "La formula per arrotondare un Intero al suo più prossimo valore inferiore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente: Intero And (Not (Numero - 1)) laddove: * ''Intero'...")
La formula per arrotondare un Intero al suo più prossimo valore inferiore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente:
Intero And (Not (Numero - 1))
laddove:
- Intero è l'Intero da arrotondare;
- Numero è il numero naturale intero di cui il valore (al quale l'Intero sarà arrotondato come risultato della formula) è un multiplo.
Mostriamo un esempio pratico, nel quale si arrotonderà l'Intero 12 al suo più prossimo valore inferiore multiplo di 4 (oosia 12):
Public Sub Main() Dim multiplo As Integer multiplo = 13 And (Not 3) Print multiplo End