1.Un module sans argument
nom_tab:tableau de 'un type'
Exemple :
ACTION déclaration montab1:tableau de entier montab2:tableau de chaine montab3:tableau de reel montab4:tableau de logique montab5:tableau de typem FIN ACTION
2. Initialisation interne d'un tableau
Avec TANT QUE
ACTION init tant que montab:tableau de entier i:entier i <-- 0 TANT QUE(i <= 5) FAIRE montab[i] <-- 0 i<-- i + 1 FINTANT FIN ACTION
Avec POUR
ACTION init pour
montab:tableau de entier
POUR(i DE 0 A 5 PAR 1 FAIRE)
montab[i] <-- 0
FINPOUR
FIN ACTION
3. Initialisation externe d'un tableau
Avec TANT QUE
Initialisation de 5 cellules avec TANT QUE
ACTION init tant que
montab:tableau de entier
i:entier
i <-- 0
TANT QUE(i <= 5) FAIRE
ECRIRE "Veuillez entrer une valeur"
LIRE montab[i]
i<-- i + 1
FINTANT
FIN ACTION
Initialisation de n cellules avec TANT QUE
ACTION init tant que
montab:tableau de entier
i,val:entier
i <-- 0
ECRIRE "Veuillez entrer une valeur"
LIRE val
TANT QUE(val != 999) FAIRE
montab[i]<-- val
ECRIRE "Veuillez entrer une valeur"
LIRE val
i<-- i + 1
FINTANT
FIN ACTION
Avec POUR
ACTION init pour
montab:tableau de entier
POUR(i DE 0 A 5 PAR 1 FAIRE)
ECRIRE "Veuillez entrer une valeur"
LIRE montab[i]
FINPOUR
FIN ACTION
4. Parcourir un tableau
Avec TANT QUE
ACTION parcourir avec TANT QUE
montab:tableau de entier
i:entier
i <-- 0
//Initialisation
TANT QUE(i <= 5) FAIRE
ECRIRE "Veuillez entrer une valeur"
LIRE montab[i]
FINTANT
//Affichage du tableau
i <-- 0
TANT QUE(i <= 5) FAIRE
ECRIRE montab[i]
FINTANT
FIN ACTION
Avec POUR
ACTION parcourir avec POUR
montab:tableau de entier
//Initialisation
POUR(i DE 0 A 5 PAR 1 FAIRE)
ECRIRE "Veuillez entrer une valeur"
LIRE montab[i]
FINPOUR
//Affichage du tableau
POUR(i DE 0 A 5 PAR 1 FAIRE)
ECRIRE montab[i]
FINPOUR
FIN ACTION
ACTION init pour montab:tableau de entier POUR(i DE 0 A 5 PAR 1 FAIRE) ECRIRE "Veuillez entrer une valeur" LIRE montab[i] FINPOUR FIN ACTION
4. Parcourir un tableau
Avec TANT QUE
ACTION parcourir avec TANT QUE montab:tableau de entier i:entier i <-- 0 //Initialisation TANT QUE(i <= 5) FAIRE ECRIRE "Veuillez entrer une valeur" LIRE montab[i] FINTANT //Affichage du tableau i <-- 0 TANT QUE(i <= 5) FAIRE ECRIRE montab[i] FINTANT FIN ACTION