PROCEDURA Carica _ V( VAL n: INT, REF v: ARRAY [ MAXDIM ] DI Calciatore)
USO DEI SOTTOPROGRAMMI Caricamento e visualizzazione di un ARRAY DI RECORD
PROCEDURA Carica _ V( VAL n: INT, REF v: ARRAY [ MAXDIM ] DI Calciatore)
i: INT
INIZIO PER i � 1 A n ESEGUI
RIPETI Scrivi(" Cognome = ") Leggi( v [ i ]. Cognome) FINCHE’( Lunghezza( v [ i ]. Cognome) ≠ 0) AND( Lunghezza( v [ i ]. Cognome) ≤ 30)
RIPETI Scrivi(" Nome = ") Leggi( v [ i ]. Nome) FINCHE’( Lunghezza( v [ i ]. Nome) ≠ 0) AND( Lunghezza( v [ i ]. Nome) ≤ 30)
RIPETI Scrivi(" Maglia = ") Leggi( v [ i ]. Maglia) FINCHE’( v [ i ]. Maglia ≥ 1) AND( v [ i ]. Maglia ≤ 99) i � i + 1 FINE PER
RITORNA FINE