résumé (cours: les fichiers)

Bonsoir,
voici un résumé pour le cours traitant les fichiers..
vous trouverez les fonctions (et procédures) les plus utilisées.





Bonne lecture.

Bon résumé. Trés bien bien concis et bien présenté. Merci.

Bonsoir, merci pour votre avis manianis..

Concernant la remarque de pseudo2008, j'ai vérifié la syntaxe..
J'ai trouvé que cette écriture ne génère pas d'erreurs..
C'est vrai que c'est plus "optimal" de déclarer la variable directement puisqu'on a un type TEXT mais, j'ai vu que c'est plus utile de suivre la même démarche vue avec les fichiers typés..

Merci comme même..

Mais Non svp,

le type TEXT est un type PREdefinit, donc on a pas besoin de le declarer comme un nouveau type,

c est la logique, on cherche pas le bon fonctionnemnet c est tou,

merci pour votre comprehesion,

il y a aussi d autres fautes ds les definitions des commandes

merci infiniment

Merci Mr

je suis tres calme , mais lorsqu on presente un documents aux eleves il faut qu'il soit facile a comprendre et evite de faire des fautes

merci une autre fois et bonne nuit

Bonsoir, merci une autre fois à pseudo2008..j'aurais toujours le plaisir d'accepter vos avis et vos rectifications..et je suis d'accord avec vous qu'on doit être sûr de la connaissance transmise aux élèves (c'est une reponsabilité comme même), mais vous savez: "l'erreur est humaine"..

MAIS,
Concernant vos indications,
j'ai trouvé dans le livre scolaire et même dans d'autres documents que RESET permet d'ouvrir un fichier typé existant pour le modifer (par exemple), avec la remise du compteur à 0;
REWRITE permet la création d'un fichier typé ou l'ouverture avec suppression du contenu.

Si ce n'est pas juste, merci bien de le mentionner..
Cordialement

Bonjour, soumaya
w nharek zine

oui, mais pour faciliter la tache aux eleves indiquer seulement :

1- RESET : Ouvre un fichier en mode lecture avec la remise de la tete de lecture a zero.

2- REWRITE : Ouvre un fichier en mode ecriture (avec mise a zero ds les deux cas, nouvelle creation et ouverture d un fichier existant)

MERCI et bonne journee

Avant tout pseudo2008 je vous souhaite la bienvenue parmi nous dans ce forum.

Premier code source (correct):

Code:

program fich01;

type fichier = text;

var
    f : fichier;
    s : string;
begin
   Assign(f, 'C:\texte.txt');
   ReWrite(f);
   
   Writeln(f, 'J''écris dans un fichier texte.');
   
   Close(f);
end.

Deuxième code source (correct) :

Code:

program fich01;

type fichier = File of integer;

var
    f : fichier;
    i : integer;
begin
   Assign(f, 'C:\texte.txt');
   ReWrite(f);
   
   for i:=1 to 100 do Write(f, i);
   
   Seek(f, 0);
   for i:=101 to 200 do Write(f, i);
   
   Seek(f, 0);
   while (not Eof(f)) do begin
        Read(f, i);
        Writeln(i);
   end;
   
   Close(f);
   
   Readln;
end.

Troisième code source (correct) :
Remplacer ReWrite() par ReSet() fonctionne aussi.

Conclusion : Pseudo2008, les notions données par Mme/Mlle Soumaya sont corrects.

La seule différence entre ReWrite et ReSet. C'est que :
- ReWrite : permet de créer le fichier s'il n'existe pas, s'il existe il est réinitialisé.
- ReSet : permet d'ouvrir un fichier uniquement s'il existe.
Les deux fonctions initialisent le pointeur de fichier à zéro.

Les notions Lecture/Ecriture seulement sont possibles uniquement avec les fichiers texte.

Merci manianis, pour votre explication,

mais pkoi la définition d'un nouveau type TEXT; qui existe déja?

si on peut ecrire :

Type fichier = TEXT;

est ce on peut ecrire :

Type N_Type = INTEGER;

Merci

Bonjour,
Merci pour l'intérêt que vous avez prouvé manianis..

En fait, avant de poster des informations, nous devons être sûrs de sa validité..Néanmoins, personellement, j'accepte de bon coeur tout avis..

Bonne journée

Les forums sont faits pour ça à mon avis.

A poste un sujet, une question.
B répond A
C répond A, et commente B.
A commente B
B commente C et A
etc...

Un seul sujet traité/discuté par plusieurs personnes. Imaginer les connaissances mises en évidence par ça.

pseudo2008 a écrit:Merci manianis, pour votre explication,

mais pkoi la définition d'un nouveau type TEXT; qui existe déja?

si on peut ecrire :

Type fichier = TEXT;

est ce on peut ecrire :

Type N_Type = INTEGER;

Merci

Cette écriture bien qu'elle soit bizarre, je suis d'accord avec vous, elle a bien une utilité. Elle est utile pour le test et le débuggage d'un programme.

Oui, on pourra bien écrire :

Code:

type n_type = integer;

Est-ce que vous pouvez expliquer d'avantage comment c'est utile pour le débogage?

nabiL a écrit:Est-ce que vous pouvez expliquer d'avantage comment c'est utile pour le débogage?

Lazem Tihrgoona Ya3ni !!!

Le débuggage ou le débogage est l'opération qui consiste à enlever les bugs d'un programme. On peut par exemple utiliser la structure décrite ci-dessus pour tester différents types de variables sans avoir à changer toutes les entêtes des fonctions qui l'utilisent.

merci, je vois l'utilité.

nabiL a écrit:merci, je vois l'utilité.

Pas de quoi. Si seulement les élèves étaient comme-vous ? Se serait le Paradis sur terre.

makram a écrit:

merci beaucoup.

Soyez le bienvenu...

voila une autre ptit résumé

1. ◊ Procedure Assign(var F ; Nom_fic : string) ;
   
   

Affecte le nom d’un fichier disque à une variable-fichier.

1. ◊ Procedure Reset(var f [ :FILE ;TailleEnr : Word]) ;
   
   
   

1. ◊ Procedure Rewrite(var f [ :FILE ; TailleEnr : Word]) ;
   
   

1. ◊ Procedure Read( var f : TEXT ; v1 [, v2, .. , vN]) ;
   
   Lit une ou plusieurs valeurs dans une ou plusieurs variables.
   
2. ◊ Procedure Readln( var f : TEXT ; v1 [, v2, .. , vN]) ;
   
   Lit une ou plusieurs valeurs dans une ou plusieurs variables jusqu’à la fin de ligne.
   ◊ Procedure Write( var f : TEXT ; v1 [, v2, .. , vN]) ;
   
   

1. ◊ Procedure Writeln( var f : TEXT ; v1 [, v2, .. , vN]) ;
   
   Ecrit une ou plusieurs valeurs dans le fichier plus un retour ligne.
   

1. ◊ Procedure Close( var f) ;
   
   Ferme un fichier ouvert.