PROGRAMME Occurences
VAR 
	tab : TABLEAU[1…n] : ENTIER
	occurence <- 0, valeur, k : ENTIER
DEBUT
	POUR k ALLANT DE 1 à n AU PAS DE 1
	FAIRE
		SI (tab[k] = valeur)
		occurence <- occurence + 1
	FINPOUR
FIN
