Discussion :

[z-lordofhardstyle]

Bonjour à tous !!

SVP j'ai un petit problème avec cet algorithme ! J'utilise Dev-Pascal pour l'instant.
Voilà l'algorithme :

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
program interet;
var
  mt:real;
  mi:real;
  d:real;
  x:real;
begin
  writeln('entrer la valeur de mi');
  readln(mi);
  writeln('entrer la valeur de d');
  readln(d);
  for x :=1 to d do 
    mt:= mi+(mi*0.02);
  writeln(mt);
  end;
  readln;
end.

J'espère que vous trouverez la solution le plus vite possible svp !!

Merci

[Alcatîz]

Bonjour et bienvenue,

En indentant le code, on s'aperçoit tout de suite qu'il manque un begin avant le contenu de la boucle for ou bien qu'il y a un end en trop. Soigner la présentation de son code est d'une grande aide pour soi-même ! ( ©Droggo )

La variable x, qui contrôle le nombre d'itérations de la boucle, peut avantageusement être déclarée comme entier, dans la mesure où elle n'intervient nulle part dans les opérations.

[darrylsite]

Salut, d'abord il faut nous dire quel probleme tu as et essayera alors de te proposer des solution.
Aussi, les variables de controle d'une boucle for doit etre soit de type ordinal (encore un mot barbare mais c' est soit des entiers, boolean, enumére,...) jamais des réels.

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
 
program interet;
var
  mt:real;
  mi:real;
  d:real;
  x:integer;
begin
  writeln('entrer la valeur de mi');
  readln(mi);
  writeln('entrer la valeur de d');
  readln(d);
{round(d) arrondi d à l'entier le plus proche}
  for x :=1 to round(d) do 
    mt:= mi+(mi*0.02);
  writeln(mt);
  end;
  readln;
end.

Tu gagneras aussi à declarer 0.02 comme une constante.

[droggo]

Wai,

La variable x, qui contrôle le nombre d'itérations de la boucle, peut avantageusement être déclarée comme entier, dans la mesure où elle n'intervient nulle part dans les opérations.

Je dirais même plus, elle doit l'être, vu qu'elle sert de contrôle pour une boucle for, sinon tintin (facile, hein !).