Cette procédure effectue l'association entre un nom de fichier et une variable de type fichier (FILE).
Procedure Assign(Var fich:File;nomfich:String);