Bonjour à tous,
Je suis étudiant en alternance et on m'a chargé de créer un programme en pascal qui doit compter le nombre d'occurences d'un nombre dans un tableau (de nombres) (le programme doit comporter une fonction)

Je vous montre mon début, qui doit etre faux..

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
(*taille physique du tableau*)
CONST IMIN = 1;
CONST IMAX = 20;
 
TYPE TabEntiers = ARRAY[IMIN..IMAX] of integer;
 
Function recherche(tab:ARRAY of integer;deb,fin,elnt : integer):boolean;
 
VAR
        i:integer=deb;
        trouve:boolean=false,fin boucle : boolean=false;
        n : 23;
BEGIN
        WHILE finboucle=false do
        BEGIN
                IF i>fin then finboucle:=true
                ELSE    if tab[i]=elnt then
                        BEGIN
                        trouve:=true;
                        finboucle:=true
                        END
                        else i:=i+1
        END;
        recherche := trouve
end;
Merci beaucoup pour votre aide!!!