Differenze tra le versioni di "Arrotondare un Intero al successivo multiplo di 2, 4, 8, 16, 32 e 64"

Da Gambas-it.org - Wikipedia.
(Creata pagina con "La formula per arrotondare un Intero al suo successivo valore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente: (((Intero) + (Numero-1)) And Not (Numero - 1)) laddove: * ''Int...")
 
Riga 1: Riga 1:
 
La formula per arrotondare un Intero al suo successivo valore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente:
 
La formula per arrotondare un Intero al suo successivo valore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente:
  (((Intero) + (Numero-1)) And Not (Numero - 1))
+
  ((Intero) + (Numero-1)) And Not (Numero - 1)
 
laddove:
 
laddove:
 
* ''Intero'' è l'Intero da arrotondare;
 
* ''Intero'' è l'Intero da arrotondare;
Riga 11: Riga 11:
 
   Dim multiplo As Integer
 
   Dim multiplo As Integer
 
    
 
    
   multiplo = (((13) + 3) And Not 3)
+
   multiplo = (13 + 3) And Not 3
 
    
 
    
 
   Print multiplo
 
   Print multiplo
 
    
 
    
 
  '''End'''
 
  '''End'''

Versione delle 18:04, 30 set 2016

La formula per arrotondare un Intero al suo successivo valore multiplo di 2, 4, 8, 16, 32 e 64 è la seguente:

((Intero) + (Numero-1)) 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 13 al suo successivo più prossimo multiplo di 4 (oosia 16):

Public Sub Main()
 
 Dim multiplo As Integer
 
  multiplo = (13 + 3) And Not 3
  
  Print multiplo
  
End