Application 22-10-2012

Voir le sujet précédent Voir le sujet suivant Aller en bas

Application 22-10-2012

Message par haiethem le Lun 22 Oct - 17:16

Bonjour chers élèves.

Le fichier "etudiants.inf" est saisi en respectant la structure de l'enregistrement etudiant:

nom,prenom : chaine de caractères

cin : entier long

moy1,moy2,moy : réel

Donc pour lire correctement on doit respecter la structure de l'enregistrement.

=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=*=

Par exemple :

procedure texte (var g:etud ; var t : texte);
var et:etud;
begin
rewrite(t);
reset(g);
while not eof(g) do
begin
read(g,et);
writeln(t,et.nom:15,' *** ',et.pre:15,' *** ',et.cin:8,' *** ',et.moy:10:2);
end;
close(g);
close(t);
end;

_________________
=================================
Haiethem Elguediri
Lycée Secondaire Mareth
+21652084191
+21652906038
+21631139805
+21675321050
haiethem@gmail.com
www.haiethem.tk
avatar
haiethem

Messages : 425
Points : 14917
Réputation : 3
Date d'inscription : 08/11/2010
Age : 41

Voir le profil de l'utilisateur http://www.haiethem.tk

Revenir en haut Aller en bas

Voir le sujet précédent Voir le sujet suivant Revenir en haut

- Sujets similaires

 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum