Unite : SorteUnite Lecture Public Trace;
Principal
/*******/
Variable
/******/
L : Nul Ou ListeDe UniteListee;
U : Nul Ou UniteListee;
Debut
L=ListerUnites();
/* Liste les unités disponibles. */
Pour U=L.ParcoursAuDebut() JusquA L.DernierElement() Faire
/* Affiche les unités correspondant à un disque dur. */
Si U.Unite==UniteDisqueDur Alors
Ecran.Ecrire(U.NomUnite+"\n");
Fin Si
Fin Pour
Fin Principal
- | - | - | - | - | - | - | - | - |