TempsEcoule : Reel Lecture Public;
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 la date de lancement du processus. */
Ecran.Ecrire(Caractere(DateSysteme()-P.TempsEcoule)+"\n");
Fin Pour
Fin Principal
- | - | - | - | - | - | - | - | - |