Discussion :

[SimoBenz]

Bonsoir,
Quand j'essaye de compiler ce programme, Dev-Pascal m'affiche trois erreurs.
Voilà le programme :

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
28
29
30
31
program Mousse;
const prix_metre = 300;
var  x : char;
     larg, long, prof, ray, haut, vol, prix, prix_metre : real;
begin
  writeln('Quelle est la forme voulue ?');
  write('saisir r pour rectangulaire, c pour cylindrique: ');
  readln(x);
    if (x <> 'r') or (x<>'c') then writeln('Saisie erronnée');
    if (x = 'r') then begin
                      write('largeur en mètres');
                      readln(larg);
                      write('longueur en mètres');
                      readln(long);
                      write('profondeur en mètres');
                      readln(prof);
                      vol:= larg*long*prof;
                      prix:= prix_metre*vol;
                      writeln('Prix T.T.C: ',prix :10:2,'euros.');
                    end;
    if (x = 'c') then begin
                     write('rayon en mètres: ');
                     readln(ray);
                     write('hauteur en mètres: ');
                     readln(haut);
                     vol:= sqr(ray*2)*haut;
                     prix:= prix_metre*vol;
                     writeln('Prix T.T.C: ',prix :10:2,'euros.');
                   end;
readln;
end.

J'ai beau chercher l'erreur, je ne trouve pas

[plegat]

Salut,

dev-pascal m'affiche trois erreures.

j'ai beau a chercher l'erreure, je ne trouve pas

Ben, suffit de lire les message d'erreur du compilateur, non???

[SimoBenz]

oui, mais ce n'est pas claire
quand je me dirrige vers la ligne signalée, je ne trouve rien

[plegat]

oui, mais ce n'est pas claire
quand je me dirrige vers la ligne signalée, je ne trouve rien

Moui, ben si tu ne nous dit rien sur les erreurs ni où elles sont signalées, on ne va pas pouvoir t'aider...

[SimoBenz]

voila les erreurs affichés
, cliquez sur le fichier attaché

[thewho]

Bonjour,

Ton compilateur te signale que tu redéfinis un nom.

DONC tu charches, et trouve où il a déjà été défini.

Étant donnée la longueur de ton programme, ce n'est tout de même pas un effort titanesque.

Désolé, je ne vais pas chercher à ta place, en plus dans du code non indenté...

[Clandestino]

Il va falloir maîtriser un peu l'anglais, c'est très très utile pour developper...
Le message de ton compilateur est très clair :

5/1 hint : Identifier already defined in exev-p~1.pas at line 2
5/1 ERROR Duplicate identifier PRIX_METRE
5/1 hint : Identifier already defined in exev-p~1.pas at line 2

à la ligne 5 il signale une erreur, son message en fr se traduit par :

Conseil : Nom déjà défini dans ton programme ligne 2
Erreur : Nom déjà utilisé PRIX_METRE

Bref tu as la ligne , le type d'erreur, et le detail exact de l'erreur... difficile de faire plus précis....

[mémécobol]

Bonjour,

Il me semble que Clandestino t'a tout dit ! La variable PRIX_METRE est déclarée 2 fois : une fois en tant que constante (= 300) et une autre fois en tant que "real"

A part ça même compilé , ton programme ne va pas bien tourner et boucler sur "saisie erronnée" vu que dans le test sur "x" tu as mis "or" au lieu de "and" , erreur grossière de logique ;

A part ça je n'y connais rien en pascal étant de la vieille école du cobol et de sa génération !