Bien le bonsoir à tous,


Voila cela fait deux mois que j'ai commencé l'Algo jusqu'a aujourd'hui pas de probeme.En effet il y a deux jours je butais sur un algo bien precis.Je m'explique.J'ai etudié les instructions simples,les instructions de controle,les tableaux,,procedure et fonction et je pense avoir compris mais en tombant sur cette alo je me mis a douté.Voici ce fameux algo.



Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
Fonction DonneOccurence (LaChaine:Tableau(80) de CARACTERE,CarRech:Caractère,Position:IN OUT NOMBRE):NOMBRE
VAR
 
Indice:Nombre
CptOCC     /compteur Occurence/
Premier:Boolean  
i:NOMBRE
 
DEBUT
 
Position = -1    /Valeur d'erreur au cas ou pas occcurence trouvée/
Premier = Vrai   /Initialisation du Flag/
CptOcc = 0
Pour i = 1 à longueur (LaChaine) Faire
Si LaChaine [i] = CarRech Faire
Si Premier Alors
Premier=Faux
Posistion = i
Fin si
CptOCC = CptOCC +1
Fin si
Fin Pour
Retourne CptOCC  
Fin Fonction
 
Programme OccurenceEtPostion
 
Var
 
LaChaine:Tableau (80) de CARACTERE
Carlu:CARACTERE
LaPostion:NOMBRE
NombreOccu:NOMBRE
 
Debut
 
/Saisir les infos souhaitées/
 
Afficher "Entrez une chaine de caractères"
Saisir: LaChaine
Afficher "Entrez un caractère"
Saisir:Carlu
 
NombreOCC=DonneOccurence (LaChaine,Carlu,LaPostion)
 
Si  LaPosition = -1 Alors
 
  Afficher "Pas d'occurence du caractère dans la chaine"
   Sinon
           Afficher "Le nombre d'occurences est de ", NombreOCC
           Afficher "La position de la première occurrence est:",LaPosition
    Fin Si
 
Fin

Merci à tous ceux qui aurront la patience de me repondre

En fait je n'ai pas compris les instruction de la fonction