1 / 20

Fichiers et Tableaux Avril 2012

TP. Fichiers et Tableaux Avril 2012. Un fichier. Permet le stockage de données sur des supports de mémoire externes ( donc les données ne seront pas perdues à la fin de l’exécution des programmes). Déclaration. Var Fichier : file of <type de base> ;. Pas de type : Array

prentice
Download Presentation

Fichiers et Tableaux Avril 2012

An Image/Link below is provided (as is) to download presentation Download Policy: Content on the Website is provided to you AS IS for your information and personal use and may not be sold / licensed / shared on other websites without getting consent from its author. Content is provided to you AS IS for your information and personal use only. Download presentation by click this link. While downloading, if for some reason you are not able to download a presentation, the publisher may have deleted the file from their server. During download, if you can't get a presentation, the file might be deleted by the publisher.

E N D

Presentation Transcript

  1. TP Fichiers et Tableaux Avril 2012

  2. Un fichier • Permet le stockage de données sur des supports de mémoire externes (donc les données ne seront pas perdues à la fin de l’exécution des programmes)

  3. Déclaration Var Fichier : file of <type de base> ; • Pas de type : • Array • File

  4. Exemple Type Personne = record Nom : string[20]; Prenom: string[20]; Age: integer; end; Var F: file of personne;

  5. Application de Gestion de stockPartie 1 : les fichiers

  6. ? • Déclaration d’un fichier d’articles ,, • Lecture de 20 articles et leur stockage dans le fichier,,,,

  7. Un Article est caractérisé par: • Une référence ………… numérique • Un nom ………… chaine de caractères • Quantité en stock de chaque article • Le stock minimal pour le ravitaillement de l’article………… numérique • Le prix unitaire de chaque article………… numérique • Le prix total de chaque article en stock………… numérique

  8. pu : integer; Le prix total

  9. Program TP;uses CRT; Type Article = record Ref: Byte; Nom : string[20]; qte: Byte; Stck_min: Byte; Prix_uni: Word; Prix_total: Word; end; Var F: file of article;

  10. Assignation de fichier Assign (nom _logique, nom_physique); Nom dans le programme Nom sur le disque Exemple Assign(f, ‘C:\perso.dat’ )

  11. Begin • Clrscr; • Assign (F, ‘stock.dat’);

  12. Ouverture d’un fichier en écriture Rewrite (nom_logique); Écriture d’un enregistrement dans un fichier Write (nom_logique, nom_variable);

  13. rewrite(F); For i:=1 to 20do begin writeln('donner le nom de l article ',i); readln(art.nom); writeln('donner la quantite de l article‘,i); readln(art.quantite); write(F , art); end;

  14. Ouverture d’un fichier en Lecture Reset (nom_logique); Lecture d’un enregistrement dans un fichier Read (nom_logique, nom_variable);

  15. reset (F); whilenot eof(F) do begin read(F, art); writeln(art.nom); end;

  16. Fermeture d’ un fichier Close (nom_logique);

  17. close(F); • Readkey; • end.

  18. Application de Gestion de stockPartie 1 : les fichiers

  19. Gestion de stockPartie 2 : les tableaux

More Related