Incrémentation du compteur dans une boucle for

Version imprimable

05/06/2011, 23h13
sukhoimk

Incrémentation du compteur dans une boucle for
Bonjour,
Code:

1 2 3 4 5 6 7 8 9 10 11 program s2; uses wincrt; var i,s:integer; begin for i:=0 to 10 do begin i:=i+1; s:=s+i; writeln('s',s); end; end.
Quand je l'exécute, il continue à incrémenter jusqu'a -32... malgré qu'il soit supposé d'incrémenter de i=0 jusqu'au 10.
Où est l'erreur svp ?
05/06/2011, 23h38
Modulpro

Bonsoir,

Un petit tour dans les regles du forum vous permettra de voir que :
- il faut éviter les titre du genre "aidez moi" ou "Help", qui ne donnent pas envie aux membres de répondre
- la balise [ CODE] [ /CODE] (sans les espaces), accessible via le bouton # de l'éditeur, permet de mettre en forme votre code.
De plus, pourquoi ne pas avoir posté dans le forum Turbo Pascal ?

Pour votre probleme, il vient du fait que vous modifiez la variable compteur i à l'interrieur de votre boucle "for".
La structure for i:=0 to 10 do incrémente automatiquement le compteur i à chaque tour.

Il faut donc supprimer i:=i+1;de la boucle.

{ exercice : ecrire un programme en pascale qui calcule la somme des 10 premiers entiers naturels }

Code:

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
 
 
 
program s2;
uses wincrt;
var i,s:integer;
begin
 
  s:=0 ; { initialisation de la somme à 0 }
 
  for i:=1 to 10 do
    begin
 
    { Pour l'instruction "For" , l'incrémentation du compteur "i" est automatique , le pas  par défaut est  égal à 1 , donc pas besoin de ça " i:=i+1" }
 
      s:=s+i;
 
    end;
writeln ( 's = ' , s) ; { l'istruction writeln doit etre en dehors de la boucle "for" si on cherche à afficher la somme finale }
 
end.
 
 
 
{Rq: on a pas besoin de " begin" et "end" sous l'instruction "for" si on a un seul traitement . }

finalement :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
program s2;
uses wincrt;
var i,s:integer;
begin
 
  s:=0;
 
  for i:=1 to 10 do
    begin
      s:=s+i;
    end;
 
    writeln('s = ',s);
end.

:ccool:

10/06/2011, 16h59
EpiTouille

Avec Turbo pascal, le compilateur accepte la modification du conteur à l’intérieur
de la boucle for, mais c'est TRES déconseillé. D'ailleurs, les nouveaux compilateur tel que Freepascal l'interdisent.
[honte] Je l'ai déjà fais [/honte]
15/07/2011, 15h40
adelneo

question bête et solution donnée et même pas un petit :resolu:
15/07/2011, 17h58
droggo

Goa,

Il n'y a pas de question bête, le demandeur aura appris quelque chose (et quelques autres aussi ...) :)

Et il est un fait que si TP et dérivés avaient interdit cette manipulation du compteur de boucle, pas mal de personnes n'auraient pas eu l'occasion de prendre cette très mauvaise habitude.