Maximum recursif

foufou -  
 4scinfo -
Bonjour,
je souhaiterais avoir la fonction récursive qui calcule le maximum d'un tableau T de n elements
Configuration: Windows XP
Internet Explorer 6.0

1 réponse

  1. 4scinfo
     
    voici une solution parmis plusieurs !!!!
    (************************************)
    function max(t:tab;n:integer);
    begin
    if n=1
    then max:=t[1]
    else t[n] > max(t,n)
    then max:=t[n]
    else max := max(t,n-1);
    end;
    (*************************************)
    mais la récursivite pour résoudre cet exercice n'est pas idéale, on préfaire utiliser la méthode itérative pour eviter la pile d'execution !!
    bonne reception.
    0