ALGORITMO Array _ SottoProgrammi
ALGORITMO Array _ SottoProgrammi
PROCEDURA Leggi _ V( VAL n: INT, REF v: ARRAY [ MAXDIM ] DI INT) i: INT INIZIO
/* Leggo e controllo i valori dell’ array */ PER i � 1 A n ESEGUI
RIPETI Scrivi(" Inserisci l’ elemento dell ' array: ") Leggi( v [ i ]) SE( v [ i ] ≤ 0)
ALLORA Scrivi(" ERRORE: l’ elemento dell’ array deve essere strettamente positivo!")
FINE SE FINCHE’( v [ i ] > 0) i � i + 1 FINE PER RITORNA FINE