![]() | ![]() |
|
|
SIMULAZIONE DI UN REGISTRO DI CLASSE.
Simulazione:
Informazioni per la risoluzione del problema: Il registro deve essere strutturato con: Alunni(cognome e nome), Classe, Sezione, Data, Assenze, Alunni giustificati, Alunni che devono giustificare. La seguente simulazione, verrà effettuata per un tempo di una settimana:
< INIZIO >
Albilli Andrea
Bangrazi Mirko
Barbaccia Alessio
----- ----- -----
----- ----- -----
----- ----- -----
----- ----- -----
----- ----- -----
----- ----- -----
Per quanto riguarda l' elenco degli alunni, la variabile s strutturata più idonea, è un vettore di record composto campi. da 28 campi di tipo stringa.
Il motivo di questa scelta, è perché nel vettore di
record (definito come alunni), possiamo immettere sia
il cognome che il nome del singolo alunno.
La posizione di ogni alunno è data dall' indice del
vettore contenuta nella variabile intera i.
Registro di classe:
Alunni Alunni da
Data Assenze giustificati giustificare
Lunedì |
Albilli, Barbaccia |
|
Bangrazi |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Martedì |
Barbaccia |
|
Albilli |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Mercoledì |
|
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Giovedì |
Albilli, barbaccia, Bangrazi |
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Venerdì |
|
Albilli, Barbaccia |
Bangrazi |
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sabato |
Bangrazi |
|
|
|||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Alunni Alunni da Data Assenze giustificati giustificare | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
| |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
| Record di vettori da 28 campi ognuno. Abbiamo scelto la struttura "record di vettori" da 28 campi, perché se ammettiamo il caso limite che tutti e 28 gli alunni siano assenti, e possibile inserire nel campo assenze tutti e 28 gli alunni. DEFINIZIONE NELLA Type: Type Settimana = record AA : array [1..28] of shortint; AG: array [1 ] of shortint; AnG: array [1 ] of shortint; end; Var sett1 : array [1..6 ] of settimana; < FINE >
|