Procédure récursive

xman -  
 xman -
je n'arrive pas a transformer cette procédure en une procédure récursive , pouvez vous m'aidez s'il vous plait. merci d'avance
procedure affiche;
var
a,b:integer;
begin
for a:=0 to 3 do
for b:=0 to 9 do
writeln(a*10+b);
end;

1 réponse

  1.
    KX Messages postés 19031 Statut Modérateur 3 020
     
    Et qu'est-ce que tu as fait pour l'instant ?
    0
    1. xman
       
      j'ai pas pu , je ne comprends pas comment faire le passage récursif
      0
    2. KX Messages postés 19031 Statut Modérateur 3 020
       
      Il faut essayer... ça ne va pas se faire tout seul.
      Déjà il faut enlever tes deux boucles, sinon c'est itératif.
      Ensuite comme il te faudra quand même des valeurs de a et b, tu devras les passer en paramètres. 

      procedure afficheRecursif(a,b:integer)
begin
    // ...
    writeln(a*10+b);
    // ...
end;
      0
    3. xman
       
      if (a>=0) and (a<=3)then
      if (b>=0) and(b<=9)then
      writeln(a*10+b);
      afficherecursif(a+1,b+1);

      c'est comme ça ?
      0
    4. KX Messages postés 19031 Statut Modérateur 3 020
       
      Ce sera quelque chose dans ce genre là, mais là tu incrémentes a et b en même temps, et ça ne correspond pas à l'imbrication des boucles que tu avais en itératif.
      0
    5. xman
       
      svp aidez moi encore une demi heure et je passe mon examen ça sera cette procédure
      0

Discussions similaires

Commande - “grep” récursif
baissaoui -
baissaoui -

0 réponse
le frigo ne marche pas....
Nemo6456 -
Templier Nocturne -

1 réponse
Point d'entrée de procédure introuvable dans la bibliothèque de liens dynamiques
Lauw238 -
Malekal_morte- -

18 réponses
Le point d'entrée introuvable
Ayca19 -
fabul -

2 réponses
Solution : Point d'entrée introuvable dans KERNEL32.dll
Anthony -
VrOMAX -

8 réponses