18 lines
388 B
Text
18 lines
388 B
Text
|
Algorithme : Création d'une file
|
||
|
|
|
||
|
|
Début
|
||
|
|
Variable F : File
|
||
|
|
Procédure InitialiserFile(var F : File)
|
||
|
|
...
|
||
|
|
FinProcédure
|
||
|
|
Fonction EstFileVide(var F : File) : Booléen
|
||
|
|
...
|
||
|
|
FinFonction
|
||
|
|
Procédure Emfiler(var x : Entier, var F : File)
|
||
|
|
...
|
||
|
|
FinProcédure
|
||
|
|
Procédure Défiler(var x : Entier, var F : File)
|
||
|
|
...
|
||
|
|
FinProcédure
|
||
|
|
Fin
|