Devoir 03 - Les Pointeurs
Devoir 03 - Les Pointeurs
Devoir 03 - Les Pointeurs
Question 1
Réponse enregistrée
Retirer la marque
100000.
à 180000.
a!cher.
NB :
Algorithme trtfichier
Type
personne=enregistrement
nom : chaîne
prenoms : chaîne
finenreg
Var
personh :
tableau[1..10]
de
personne
personf :
tableau[1..15]
de
personne
i : entier
person,clt :
personne
Début
ouvrir
"homme.txt"
sur 1 en
ecriture
Pour i ← 1 à 10 faire
Saisir
personh[i].nom
Saisir
personh[i].prenoms
Saisir
personh[i].age
Saisir
personh[i].salaire
finpour
ecrirefichier
1,personh
fermer(1)
ouvrir
"femme.txt"
sur 1 en
ecriture
Pour i ← 1 à 15 faire
Saisir personf[i].nom
Saisir personf[i].prenoms
Saisir personf[i].age
Saisir personf[i].salaire
finpour
ecrirefichier
1,personf
fermer(1)
ouvrir
"client.txt" sur 1 en
ajout
ouvrir
"homme.txt" sur 2 en
lecture
LireFichier
2,person
EcrireFichier
1,person
FinTq
fermer(2)
ouvrir
“femme.txt”
sur 2 en
lecture
Tantque Non
eof(2)
faire
LireFichier
2,person
EcrireFichier
1,person
FinTq
fermer(2)
fermer(1)
ouvrir
"client.txt" sur 1 en
lecture
tantque
Non
eof(1)
faire
lirefichier
1,clt
A!cher clt
FinTq
fermer(1)
Fin
Terminer le test…
Aller à…
moment.