NomProgramme : Caractere Lecture Public Trace;
Principal
/*******/
Variable
/******/
L : Nul Ou ListeDe ProcessusListe;
P : Nul Ou ProcessusListe;
Debut
L=ListerProcessus();
/* Liste les processus s'exécutant. */
Pour P=L.ParcoursAuDebut() JusquA L.DernierElement() Faire
/* Affiche le nom du programme du processus. */
Ecran.Ecrire(P.NomProgramme+"\n");
Fin Pour
Fin Principal
- | - | - | - | - | - | - | - | - |