Discussion :

[linn-ux]

Bonjour,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
var
 a, b,i : integer;
 r:real;
begin
  write('a,b ?'); readln(a);readln(b);
  a:=1;
  for i:=1to b do
  begin
  r:=a*i;
 
  end;
 writeln('le resultat est',r);
end.

Ca doit paraitre con à certains d'entre vous , mais je l'ai refait n fois et le résultat n'est pas juste.
Quelle faute ai-je commise ?

[droggo]

Wue,

Suis ton code ligne par ligne, en notant l'évolution des variables [ce qui se passe réellement, pas ce que tu penses avoir écrit], et tu trouveras.

[ankojem]

Bonjour,

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
var
 a, b,i : integer;
 r:real;
begin
  write('a,b ?'); readln(a);readln(b);
  a:=1;
  for i:=1to b do
  begin
  r:=a*i;

  end;
 writeln('le resultat est',r);
end.

Ca doit paraitre con à certains d'entre vous , mais je l'ai refait n fois et le résultat n'est pas juste.
Quelle faute ai-je commise ?

ETAIT-CE OBLIGE DE METTRE CE readln(a)?

[droggo]

Weo,

Non, ou oui.

Car on peut penser que c'est la ligne

Code :

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

 a:=1;

qui est en trop.