Differenze tra le versioni di "Conoscere il valore numerico più alto contenuto da un vettore"
Da Gambas-it.org - Wikipedia.
Riga 5: | Riga 5: | ||
Esempio: | Esempio: | ||
− | + | Public Sub Main() | |
Dim ii As Integer[] | Dim ii As Integer[] | ||
Riga 15: | Riga 15: | ||
Print "Il numero maggiore immesso è: "; ii[0] | Print "Il numero maggiore immesso è: "; ii[0] | ||
− | + | End | |
===Con apposita scansione del vettore all'interno di ciclo=== | ===Con apposita scansione del vettore all'interno di ciclo=== | ||
Questa modalità prevede la scansione del vettore per cercare il valore numerico maggiore: | Questa modalità prevede la scansione del vettore per cercare il valore numerico maggiore: | ||
− | + | Public Sub Main() | |
Dim imax As Integer = -2147483648 | Dim imax As Integer = -2147483648 | ||
Riga 33: | Riga 33: | ||
Print "Il numero maggiore immesso è: "; imax | Print "Il numero maggiore immesso è: "; imax | ||
− | + | End |
Versione attuale delle 04:51, 10 giu 2024
Per conoscere il valore numerico più alto contenuto da un vettore numerico, 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 valore numerico maggiore:
Public Sub Main() Dim imax As Integer = -2147483648 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] > imax Then imax = ii[b] Next Print "Il numero maggiore immesso è: "; imax End