Pascal/Array: differenze tra le versioni

 

Se diamo un nome alla tabella, ad esempio ''Array'', possiamo indicare il valore dell'elemento di indice 8 in questo modo:

Array[8] {indica l'elemento di posizione 8}

così come

Array[9] {indica l'elemento di posizione 9}

e così via.

 

che indica che il vettore nome_variabile avrà come posizioni i numeri da 1 a n (la notazione ''x''..''y'' dove x e y sono due valori dello stesso tipo indica tutti i valori compresi tra ''x'' e ''y'').

<br/>Notare che quello indicato tra parentesi non è altro che un ''[[Pascal/Gestione avanzata dei dati#Subrange|subrange]]'', e quindi sono ammesse anche dichiarazioni come:

var

scheda: array['a'..'z'] of integer

e così vale per gli altri tipi di dati, anche quelli enumerativi. Valgono anche dichiarazioni come:

type

mese : (gen, feb, mar, apr, mag, giu, lug, ago, set, ott, nov, dic);

var

nomi_mesi: array[mese] of string;

 

Per accedere ai valori dell'array, è sufficiente comportarsi come con le variabili normale, usando la notazione

nome_array[indice]

Ad esempio:

scheda['a'] := 45;

writeln(scheda['a']);

 

È possibile dichiarare gli array anche con un altro metodo:

 

Per leggere e scrivere gli elementi di un vettore di N elementi in Pascal è possibile usare un ciclo for:

for I:=1 to N do

readln(vettore[I]);

for I:=1 to N do

writeln(vettore[I]);

All'aumentare del contatore I, il programma scorre i posti del vettore. Nel caso di array che utilizzano indici non interi, si userà ad esempio:

for I := 'a' to 'z' do

readln(vettore[I]);

 

== Array bidimensionali ==

 

Per leggere e scrivere i dati di una matrice di N righe e M colonne in Pascal si possono usare due cicli for annidati:

for I:=1 to N do

for J:=1 to M do

for J:=1 to M do

writeln(array[I,J]);

 

== Utilizzi ==

L'utilizzo degli array è molto comodo, perché permette di gestire facilmente grandi quantità di dati. Vediamo ad esempio questo programma per un ipotetico sistema di gestione degli alunni:

program verifica;

var numalunni, puntimax, i : integer;

readln;

end.

 

Un'altra utilità degli array è quella di poter accedere ad un valore anche senza saperne il suo nome, ma solo tramite un valore immesso dall'utente. Ad esempio, volendo convertire il numero di un mese nel nome corrispondente, senza array, bisognerebbe fare ricorso ad un costrutto ''case... of''. Usando i vettori, invece, è sufficiente dichiarare un array <code>nomeMese[1..12]</code> e assegnare ad ogni posizione il nome del mese interessato. Per ottenere poi il nome del mese ''n'', basterà scrivere <code>nomeMese[n]</code>.

* Creare un programma che stampi i primi ''n'' numeri della ''successione di Fibonacci'' (la serie di Fibonacci è una serie di numeri F dove F₀ = 0, dove F₁ = 1 e ciascun altro dove F_''n'' = F_''n''-1 + F_''n''-2)

{{cassetto|titolo=Soluzione|testo=

program Fibonacci;

{$APPTYPE CONSOLE}

readln;

end.

}}

[[Categoria:Pascal|Array]]