INF 1425 TP

Exercice 1. Les tableaux (8 points)

(1)

Fonction  sommeTabListeEleve (t : Tab; nmax :entier )

Var i :entier; somme : entier

Début 

        Somme : =0;

        Pour i := 1 à nmax  faire

        Somme: = somme +t[i];

        sommeTabListeEleve : = somme;

Fin

(2)

Fonction  sommeTabListeEleve (t : Tab; nmax :entier )

Var i :entier; somme : entier

Début 

        Si nmax : =0;

        Alors sommeTabListeEleve:= t[1];

        Sinon sommeTabListeEleve:= sommeTabListeEleve(t, nmax-1) t[n];

        Finsi

Fin

(3)

La méthode itérative permet de répéter l’exécution du programme  à l’aide d’une boucle et d’une variable  qui s’incrémente à chaque passage pendant  un certain  nombre d’actions et un certain nombre de fois. Alors que la récursive permet de répéter  un  nombre indéterminé de fois une action  tant que la condition  placer dan la fonction est vrai.

Exercice 2. Les piles et les files (8 points)

(1)

L’avantage de la pile les opérations sont faciles car elles sont toutes effectuées sur la même extrémité. Alors que dans la structure tableau les opérations d’insertion et de suppression d’élément sont impossible sauf si on crée un nouveau tableau de taille plus petite ou plus grand selon l’opération.

(2)

 Algorithme : insertion d’élément dans la pile P

STRUCUTRE PILE{ taille : ENTIER ; sommet : ENTIER ; T : Tableau [1..N] d’ENTIER}

Procédure Empiler( VAR p : File, element : ENTIER :

        DEBUT

                SI p.taille = N

                ALORS

                        ECRIRE (‘’Pile pleine’’)

                SINON

                        p.sommet        p.sommet+1[pic 1]

                        p.T[p.sommet]           element[pic 2]

                FINSI

        FIN

(3)

Algorithme : Calcul de la taille de  la pile P

        Fonction Taille (p :PILE) ENTIER

        DEBUT

        Retourner (p.sommet)

        FIN

(4)

(5)

Algorithme : insertion  d’élément dans  une  File

STRUCUTRE FILE { tete: ENTIER ; queue : ENTIER ; T : Tableau [1..N] d’ENTIER}

VAR  fileVide, filePleine :BOOLEAN

VAR f.longueur : ENTIER

Procedure Enfiler (f:File, X : element)

DEBUT

                SI f.longueur = N

                ALORS ECRIRE ( ‘’File plaine’’)

                SINON

                        SI fileVide

...