Description...
Exemple...
Traduction...
SorteUnite Dans (UniteDisqueDur, UniteDisqueAmovible, UniteReseau, UniteCdRom, UniteVirtuelle);
La signification des valeurs est la suivante :
Principal
Debut
Variable
L : Nul Ou ListeDe UniteeListee;
U : Nul Ou UniteeListee;
L=ListerUnites(Nul);
Pour U=L.ParcoursAuDebut() JusquA L.DernierElement() Faire
Selon U.Unite Faire
Cas Dans (UniteDisqueDur, UniteDisqueAmovible) Faire
Ecran.Ecrire("Disque classique\n");
Fin Cas
Defaut
Ecran.Ecrire("Disque spécial\n");
Fin Defaut
Fin Selon
Fin Pour
Fin Principal
MasseEinheitWeise | UnitKind | 单位种类 | ClaseUnidad | - | - | - | - |