		Programmazione - corso A

   Lab6


Siano date le seguenti dichiarazioni:


Program INetRadio;

Const
     strlen=64;
     dim=10;
     numutenti=32;

Type
     ten=0..10;
     range=0..100;
     range_Utenti=0..numutenti;	

     top=String[strlen];

     utente=Record
                    nome_Utente: top;
                    canzone_Pref: top;
                    artista: top;
                    punt_Canzone: range;
                 End;

     utenti=Array[1.. numutenti] of utente;

var 
    utentiSito: utenti;
    utentiRegistrati: rangeUtenti;	

BEGIN
   UtentiRegistrati:=0;
END.


 Aggiungere al programma le seguenti funzionalit:

1. Procedura (o funzione) di ricerca di un utente avente 
   un nome prefissato. 
2. Procedura (o funzione) di inserzione di un nuovo utente.
3. Procedura (o funzione) di rimozione di un utente esistente.
4. Conteggio del numero di utenti che gradiscono una canzone 
   prefissata con un indice di gradimento (campo punt_canzone)
   maggiore od uguale ad una soglia data.Si stampino inoltre 
   tutti i record relativi ad utenti che soddisfano il criterio
   sopraindicato.



