[Turbo Pascal] Récurcivité dans un tableau

the_tunisian Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -  
 dourayed -
Bonjour,
je cherche une fonction recursive (en turbo pascal) qui permet de determiner la valeur la plus proche de m dans un tableau t de n entiers
A voir également:

1 réponse

Réponse 1 / 1
dourayed
 
il faut trier le tableau d'un ordre croissant avant de faire ca
function recurcive(t:tab;n,m:integer):integer;
var
i:integer;
begin
if t[1]>m then
recurcivité:=t[1];
else
i:=1;
repeat
if t[i+1]>m then
récurcivité:=t[i+1];
else
i:=i+1;
end;
until i>n;
end;
end;
0

Discussions similaires

Tableau croisé dynamique - absence de certaines données
crazyrider71 -
Hana -

4 réponses
Formule taux de marque
vcloclo1 -
vcloclo1 -

26 réponses