[Fonction] La valeur la plus proche d’un élément x dans un tableau

Une fonction qui permet de donner la valeur la plus proche d’un élément x dans un tableau:


Fonction Proche(T: tab[1..n], x: entier): entier;

Var
	P, i, résultat: entier;

Debut

	P := abs(T[1] - x);		// abs(x) = La valeur absolue de x
	résultat := T[1];

	Pour i := 2 à n Faire:
		Si (abs(T[i] - x < P)) Alors
			P := abs(T[i] - x);
			résultat := T[i];
			i := n + 1;	// Casser la boucle
		FinSi

	Renvoyer résultat;

Fin

Ou bien, on peut stocker dans un autre tableau les valeurs de abs(T[i] – x), et la valeur la plus proche l’élément est ce qui le miniman du 2eme tableau.

2 commentaires

  1. Philippe · · Répondre

    Bonjour,

    Bizarre cet algo: resultat est T[1] quel que soit la valeur de x !!!
    Mais je suis d’accord avec la remarque qui suis l’algo.

    1. Merci pour la remarque, on a corrigé l’erreur.
      Au place de résultat := T[1]; il faut écrire: résultat := T[i];
      Maintenant, ça marche.

Laisser des commentaires:

Entrez vos coordonnées ci-dessous ou cliquez sur une icône pour vous connecter:

Logo WordPress.com

Vous commentez à l'aide de votre compte WordPress.com. Déconnexion / Changer )

Image Twitter

Vous commentez à l'aide de votre compte Twitter. Déconnexion / Changer )

Photo Facebook

Vous commentez à l'aide de votre compte Facebook. Déconnexion / Changer )

Photo Google+

Vous commentez à l'aide de votre compte Google+. Déconnexion / Changer )

Connexion à %s

%d blogueurs aiment cette page :