Differenze tra le versioni di "Sapere se un numero è pari o dispari"
Da Gambas-it.org - Wikipedia.
Riga 1: | Riga 1: | ||
− | Per sapere se un numero è pari, è possibile utilizzare almeno | + | Per sapere se un numero è pari, è possibile utilizzare almeno tre modalità: |
+ | |||
+ | |||
+ | ===Uso della funzione ''Even''=== | ||
+ | La modalità più semplice, per sapere se un numero è pari, è usare la funzione ''Even()'' secondo la seguente sintasi: | ||
+ | Even(numero) As Boolean | ||
+ | la quale restituisce ''Vero'' se il numero verificato è ''pari''. | ||
Versione delle 16:01, 9 apr 2014
Per sapere se un numero è pari, è possibile utilizzare almeno tre modalità:
Uso della funzione Even
La modalità più semplice, per sapere se un numero è pari, è usare la funzione Even() secondo la seguente sintasi:
Even(numero) As Boolean
la quale restituisce Vero se il numero verificato è pari.
Uso della funzione Mod
L'uso della funzione Mod() calcola il resto del quoziente di due numeri interi.
Poiché una caratteristica dei numeri pari è che, divisi per 2, essi restituiscono sempre il resto del quoziente pari a zero, se il calcolo del resto del quoziente ottenuto con la funzione Mod è uguale a zero, allora il numero sarà pari, altrimenti sarà dispari:
Esempio:
Public Sub Main() Dim j As Byte For j = 1 To 20 If j Mod 2 = 0 Then Print j, "numero dispari !" Else Print j, "numero pari !" Endif Next End
Uso dell'operatore AND
Si porrà il valore da verificare con l'operatore AND ed il valore 1, agendo così sui bit.
Esempio:
Public Sub Main() Dim j As Byte For j = 1 To 20 If j And 1 Then Print j, "numero dispari !" Else Print j, "numero pari !" Endif Next End