Correction du TD n°3
001 action afficherTableau(t)
002 Données t : Tableau [N] de entier
003 Locales i : entier
004 pour i de 0 à N-1 faire
005 ecrire(t[i]," ");
006 fait
007 fin action
001 fonction egaux(t1,t2):booléen
002 Données t1,t2 : Tableau [N] de entier
003 Locales i : entier
004 i := 0
005 tantque i < N et t1[i] = t2[i] faire
006 i := i + 1
007 fait
008 Résultat : (i=N)
009 fin fonction
001 fonction produitScalaire(t1,t2):booléen
002 Données t1,t2 : Tableau [N] de entier
003 Locales i,p : entier
004 p := 0
005 pour i de 0 à N-1 faire
006 p := p + t1[i]*t2[i]
007 fait
008 Résultat : p
009 fin fonction
001 action rechercheMinMax(t,min,imin,max,imax)
002 Données t : Tableau [N] de entier
003 Résultats min,imin,max,imax : entier
004 Locales i : entier
005 min := t[0]
006 imin := 0
007 max := t[0]
008 imax := 0
009 pour i de 1 à N-1 faire
010 si t[i] < min alors
011 min := t[i]
012 imin := i
013 sinon
014 si t[i] > max alors
015 max := t[i]
016 imax := i
017 fsi
018 fsi
019 fait
020 fin action
001 fonction nombreOccurrences(t,v):entier
002 Données t : Tableau [N] de entier
003 v : entier
004 Locales i,cpt : entier
005 cpt := 0
006 pour i de 0 à N-1 faire
007 si t[i] = v alors
008 cpt := cpt+1
009 fsi
010 fait
011 Résultat : cpt
012 fin fonction
Auteur: Nicolas JANEY
UFR Sciences et Techniques
Université de Besançon
16 Route de Gray, 25030 Besançon
nicolas.janey@univ-fcomte.fr
