Programme (exe + tous les fichiers txt)  installer imprativement dans le dossier Z:\Informatique\InterCE\
sinon, les procdures de chargement et d'enregistrement ne marcheront pas.

Les prix sont tous declars comme des entiers (integer).
S'il y a besoin d'avoir des reels, il faudra changer tous les types, par exemple :
prixc:integer; devient prixc:float;
J'ai fait expres de ne pas soumettre les prix  mes procdures de gestion des erreurs,
comme a il est possible de les passer en float.
Si ils sont rests en integer, je conseille de reprendre chaque ligne du programme dans
lesquelles ont demande le prix, comme par exemple :
readln(spect.prixa);
et de la remplacer par (par exemple):
spect.prixa:=traitement(0);

Ne pas oublier de creer un bon paquet de commandes, spectacles etc... et de les enregistrer, pour les jeux d'essais.