Discussion :

[User Name]

Bonjour à tous,
Lorsque je compile ce code:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
implementation
  procedure ask_salvaro;
  begin
    writeln('Bonjour Salvaro, combien font 2+2?');
    read(line);
     begin
       if line = '4' then
         writeln('Bravo, tu l''as fait tout seul?');
         read(line2);
         begin
           if line2 <> 'oui' then
            begin
             writeln('Mouarf! Bon, on recommence!');
             readln;
             ask_salvaro;
            end
           else
            writeln('Bien fiston, tu vois quand tu veux?')
         end;
         writeln('Tu l''as fait expres, n''est-ce pas?')
     end;
      writeln('Bon, un autre, quelle est l''intégrale de arcsin(x)?');
      read(line3);
      writeln('lol, n''importe quoi!)' + 'Mais bon, je ne te cache pas que meme moi je n''ai pas la réponse. Allez, on recommence?');
      ask_salvaro;
  end;
end.

La console se referme toute seule. Pourquoi?
Merci d'avance

[popo]

c'est tout à fait normal quand la procédure se termine.
Pour éviter cela tu devrai faire une boucle qui tourne tant qu'une varaible est egale à 'OUI'. Et à chaque fois que tu arrive en fin de traitement tu pose la question à l'utiliseur pour savoir 'il veut quitter et dans ce cas tu passe à 'NON'

[Aka Guymelef]

Bonjour,

est-ce que tu appelles ta procédure dans le corps de ton programme ?