rdmarmotte May the force be with you ... | Maxwell8 a écrit a écrit :
Salut,
Je cherche à déterminer si ma séquence est croissante. Elle se termine par '0' et je dois afficher True ou False...
J'ai quand même bien du mal...
Code :
- program seqCroiss;
- var c,ec:integer;
- begin
- writeln('Entrer la séquence...');
- read(c);{c=invariant}
- read(ec);{ec=élément courant}
- while not (ec=0) do
- begin
- if ec>c then c:=ec else write('False');
- end;
- write('True');
- end.
|
|
Dans un premier temps, essaye de mettre le read de ton element courant dans la boucle, sinon, il ne se fera qu'une seule fois (a part si c ca que tu veux ). en tout cas ce serait bien d'avoir plus d'infos sur ce que tu veux faire ---------------
Cobol le jour, PHP la nuit ... Je préfère franchement mes nuits ...
|