8 : I dati e la loro struttura nella programmazione ( ARRAY , MATRICI , RECORD ) Vers . 8.2 – Settembre 2022
Esempio 2 : Caricare e visualizzare i dati relativi ai libri posseduti da una libreria N . B . Effettuando tutti i controlli sui campi previsti in fase di definizione del tracciato record ALGORITMO ArrayDiRecord _ CHECK _ YES MAXDIM 10
/* Per il tracciato record vedi l ’ esempio precedente */ .......
PROCEDURA main ( )
libreria : ARRAY [ MAXDIM ] DI Libro i , n : INT
INIZIO /* leggo la dimensione del vettore da caricare ( vedi esempi precedente ) */ .......
/* Carico l ’ array di record controllando e valorizzando ciascun campo del record */ PER i � 1 A n ESEGUI
RIPETI
Leggi ( libreria [ i ]. Isbn ) FINCHE ’ ( libreria [ i ]. Isbn ≠ "") AND ( Lunghezza ( libreria [ i ]. Isbn ) ≤ 10 )
RIPETI
Leggi ( libreria [ i ]. Titolo ) FINCHE ’ ( libreria [ i ]. Titolo ≠ "") AND ( Lunghezza ( libreria [ i ]. Titolo ) ≤ 100 )
RIPETI
Leggi ( libreria [ i ]. Autore ) FINCHE ’ ( libreria [ i ]. Autore ≠ "") AND ( Lunghezza ( libreria [ i ]. Autore ) ≤ 50 )
RIPETI
Leggi ( libreria [ i ]. CasaEditrice ) FINCHE ’ ( libreria [ i ]. CasaEditrice ≠ "") AND ( Lunghezza ( libreria [ i ]. CasaEditrice ) ≤ 50 )
RIPETI
Leggi ( libreria [ i ]. Prezzo ) FINCHE ’ ( libreria [ i ]. Prezzo > 0 ) AND ( libreria [ i ]. Prezzo ) ≤ 999.99 )
RIPETI
Leggi ( libreria [ i ]. Pagine ) FINCHE ’ ( libreria [ i ]. Pagine > 0 ) AND ( libreria [ i ]. Pagine ) ≤ 9999 ) i � i + 1 FINE PER
/* Visualizzo l ’ array di record stampando ciascun campo del record */
PER i � 1 A n ESEGUI Scrivi ( libreria [ i ]. Isbn ) Scrivi ( libreria [ i ]. Titolo ) Scrivi ( libreria [ i ]. Autore ) Scrivi ( libreria [ i ]. CasaEditrice ) Scrivi ( libreria [ i ]. Prezzo ) Scrivi ( libreria [ i ]. Pagine ) i � i + 1 FINE PER
FINE
Autore : Rio Chierego ( email : riochierego @ libero . it - sito web : www . riochierego . it ) Pag . 52