// Attention nous avons décidé de chercher le dernier élément et non le premier comme dit dans l'énoncé !

fonction Recherche_inverse(E v:vecteur d'entier, E recherche:entier, E taille:entier):entier

{

	variable i, indice:entier

	         trouvé:booléen

	i <-- taille - 1

	indice <-- -1	



	Tant que ((i >= 0) ET (indice = -1))

	{

		Si (v[i] = recherche)

		{

			indice <-- i

		}

		i <-- i - 1

	}

	retourne indice

}



procédure Remplissage(E/S v:vecteur d'entier, E taille:entier)

{

	variable i:entier

	

	Pour i de 0 à taille - 1

	{

		Afficher("Entrez le ", i+1, "ème élément du vecteur : ")

		Saisir(v[i])

	}	

}



fonction Entier_à_chercher():entier

{

	variable nombre:entier

	Afficher("Veuillez entrer l'entier que vous voulez chercher : ")

	Saisir(nombre)

	retourne nombre

}



procédure Affichage(E indice:entier, E recherche:entier)

{

	Si (indice = -1) alors

	{

		Afficher("Le nombre ", recherche, " n'a pas été trouvé.\n")

	}

	sinon

	{

		Afficher("Le nombre ", recherche, " a été trouvé à l'indice ", indice, ".\n")

	}

}



Algorithme Recherche

{

	//Déclarations

	constante entier TAILLE <-- 10

	variable v:vecteur de TAILLE entier

		 recherche:entier



	//Instructions

	Remplissage(v, TAILLE)

	recherche <-- Entier_à_chercher()

	Affichage(Recherche_inverse(v, recherche, TAILLE), recherche)

}