Differenze tra le versioni di "Arrotondare un Intero al più prossimo valore inferiore multiplo di 2, 4, 8, 16, 32 e 64"

Versione attuale delle 16:05, 1 lug 2024

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 15 al suo più prossimo valore inferiore multiplo di 4 (ossia 12):

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

@@ Riga 5: / Riga 5: @@
 * ''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 15 al suo più prossimo valore inferiore multiplo di 4 (ossia 12):
-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()
-  '''Public''' Sub Main()
-  Dim multiplo As Integer
+   Dim multiplo As Integer
-    multiplo = 13 And (Not 3)
+    multiplo = 15 And (Not 3)
     Print multiplo
-  '''End'''
+  End