Differenze tra le versioni di "Conoscere il valore numerico più alto contenuto da un vettore"

Da Gambas-it.org - Wikipedia.
 
(5 versioni intermedie di uno stesso utente non sono mostrate)
Riga 1: Riga 1:
−
Per conoscere il valore numerico più alto contenuto da un vettore, possiamo adottare almeno due modalità.
+
Per conoscere il valore numerico più alto contenuto da un vettore <SPAN Style="text-decoration:underline">numerico</span>, 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.
 
  
 +
===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:
 
Esempio:
Riga 11: Riga 9:
 
   Dim ii As Integer[]
 
   Dim ii As Integer[]
 
    
 
    
−
  ii = [11, 33, 77, 88, 22, 66, 44, 55]
+
  ii = [11, 33, 77, 88, 22, 66, 44, 55]
 
    
 
    
−
  ii.Sort(gb.Descent)
+
  ii.Sort(gb.Descent)
 
    
 
    
−
  Print "Il numero maggiore immesso è: "; ii[0]
+
  Print "Il numero maggiore immesso è: "; ii[0]
 
      
 
      
 
  '''End'''
 
  '''End'''
  
−
 
+
===Con apposita scansione del vettore all'interno di ciclo===
−
 
+
Questa modalità prevede la scansione del vettore per cercare il valore numerico maggiore:
−
====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()
 
  '''Public''' Sub Main()
 
   
 
   
 +
  Dim imax As Integer = -2147483648
 
   Dim b As Byte
 
   Dim b As Byte
 
   Dim ii As Integer[]
 
   Dim ii As Integer[]
 
    
 
    
−
  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] > imax Then imax = ii[b]
−
  Next
+
  Next
 
    
 
    
−
  Print "Il numero maggiore immesso è: "; max
+
  Print "Il numero maggiore immesso è: "; imax
 
    
 
    
−
  '''Next'''
+
  '''End'''

Versione attuale delle 09:39, 4 mag 2022

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
Estratto da "https://www.gambas-it.org/wiki/index.php?title=Conoscere_il_valore_numerico_più_alto_contenuto_da_un_vettore&oldid=31168"