/* Recherche de la place du maximum de la liste tab de taille longueur
*/
max <== tab[0]
place = 0
Pour i allant de 1
à longueur faire
si tab[i] > max
alors max <== tab[i]
place <== i
fin_de_pour
rendre place
/* Initialisation du tableau */
Pour i allant de 0
à 99 faire
occurence[i] <== 0
fin_de_pour
/* Calcul des occurences de chaque entier possible de la liste */
Pour i allant de 0
à longueur faire
occurence[tab[i]] <= occurence[tab[i]] + 1
fin_de_pour
/* Recherche du maximum */
max <== occurence[0]
Pour i allant de 1
à 99 faire
si occurence[i] > max
alors max <== occurence[i]
reponse <== i
fin_de_pour
rendre reponse