Discussion :

[lolo90]

Bonjour

J'ai une question concernant un programme que j'ai élaboré. En effet, je ne trouve pas mes erreurs de syntaxe, pourriez-vous m'aider ?

Voici le code :

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
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
program impots;
  var
  N,QF,RI,MI,I:real;
  celibataire,couple,coupleavec1enfant,coupleavec3enfants,coupleavec4enfants:string;
  S:string;
 
Begin
  writeln('entrer le montant imposable de votre famille');
  readln(MI);
 
  RI:=MI*0.9*0.8;
  writeln('saisissez votre situation familiale, celibataire, couple, couple avec 1 enfant, couple avec 3 enfants, couple avec 4 enfants');
  readln(S);
 
       if(S=celibataire)
       then N:=1;
       if(S=couple)
       then N:=2;
       if(S=coupleavec1enfant)
       then N:=3;
       if(S=coupleavec3enfants)
       then N:=4;
       if(S=coupleavec4enfants)
       then N:=5;
 
   QF:=RI/N;
 
          if(QF<25610)
          then I:=0;
          if(QF>=25610)and(QF<=50380)
          then I:=(RI*0.105)-(2689*N);
          if(QF>50380)and(QF<=88670)
          then I:=(RI*0.24)-(9490*N);
          if(QF>88670)and(QF<=143580)
          then I:=(RI*0.33)-(17470*N);
          if(QF>143580)and(QF<=233620)
          then I:=(RI*0.43)-(31828*N);
          if(QF>233620)and(QF<=288100)
          then I:=(RI*0.48)-(43509*N);
          if(QF>288100)
          then I:=(RI*0.54)-(607795*N);
 
    writeln('Votre impot est de ','I');
    readln;
    readln;
 
end.

Merci beaucoup d'avance.

Bien Cordialement,

lolo90

[droggo]

Mao,

Regarde les messages de ton compilateur, tu connaîtras les lignes qui posent problème.

Et reprends tes cours pour comprendre.

[Alcatîz]

Bonjour,

Pour comprendre les messages d'erreur renvoyés par le compilateur, tu peux t'aider de la FAQ :
http://pascal.developpez.com/faq/?pa...de-compilation

[Paul TOTH]

question pratique, je ferais plutôt un affichage comme ceci:

saisissez votre situation familiale :
1- celibataire,
2- couple,
3- couple avec 1 enfant,
4- couple avec 3 enfants,
5- couple avec 4 enfants
_

[Loupsio]

coupleavec1enfant,coupleavec3enfants

1-les couples avec 2 enfants sont exonérés?

2- a quoi correspond ton N? a première vu on dirai le nombre de parts mais 1 couple avec un enfant = 2,5 part
1 couple avec trois enfants = 3 parts
et un couple avec 4 enfants = 4parts
ce que ne serait pas le cas dans ton exemple si c est bien le nombre de parts

3-

writeln('Votre impot est de ','I');

les apostrophes servent a écrire exactement ce qu'il y a entre 2 apostrophes, or la tu veux justement pas écrire I mais la valeur de I, donc I ne doit pas être entre apostrophes

4- enleve les points virgules apres chaque 'then' sauf le dernier et rajoute des 'else' devant chaque if sauf le premier

Code :

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

1
2
3
4
5
6
7
8
if....then
 I:=....
else if .... then
I:=...
else if ... then
I:= ...
else if .... then
I:=... ;

[extrem-alpha]

question pratique, je ferais plutôt un affichage comme ceci:

saisissez votre situation familiale :
1- celibataire,
2- couple,
3- couple avec 1 enfant,
4- couple avec 3 enfants,
5- couple avec 4 enfants

+1
tu peux utiliser

Code :

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

1
2
3
4
5
case s of 
.
.
.
end;

(biensur tu dois modifier le type de la varibale

Code :

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

s:byte;