Differenze tra le versioni di "Conoscere il valore numerico più alto contenuto da un vettore"
Da Gambas-it.org - Wikipedia.
(Creata pagina con "Per conoscere il valore numerico più alto contenuto da un vettore, possiamo adottare almeno due modalità. ====Uso del metodo ''.Sort()''==== Questa modalità prevede il ri...") |
|||
Riga 32: | Riga 32: | ||
ii = [11, 33, 77, 88, 22, 66, 44, 55] | ii = [11, 33, 77, 88, 22, 66, 44, 55] | ||
+ | |||
For b = 0 To ii.Max | For b = 0 To ii.Max | ||
If ii[b] > max Then max = ii[b] | If ii[b] > max Then max = ii[b] |
Versione delle 19:35, 21 mag 2016
Per conoscere il valore numerico più alto contenuto da un vettore, possiamo adottare almeno due modalità.
Uso del metodo .Sort()
Questa modalità prevede il ricollocamento dei valori presenti mediante il metodo .Sort() del vettore in ordine .discendente. Pertanto il nuovo valore preente nel primo elemento del vettore sarà il valore numerico più alto fra tutti.
Esempio:
Public Sub Main() Dim ii As Integer[] ii = [11, 33, 77, 88, 22, 66, 44, 55] ii.Sort(gb.Descent) Print "Il numero maggiore immesso è: "; ii[0] End
Con apposita scansione del vettore all'interno di ciclo
Questa modalità prevede la scansione del vettore per cercare il vaore numerico maggiore:
Private max As Integer = -2147483648 Public Sub Main() Dim b As Byte Dim ii As Integer[] ii = [11, 33, 77, 88, 22, 66, 44, 55] For b = 0 To ii.Max If ii[b] > max Then max = ii[b] Next Print "Il numero maggiore immesso è: "; max Next