Programme Calcul Impôts

[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 :

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...PCompileErrors

[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 :

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 :

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

(biensur tu dois modifier le type de la varibale

Code :

s:byte;

[mohamine1989]

Pour le test (condition) suivante :

Code :

1
2
 
if(S=celibataire)

S est de type string, tu doit faire :

Code :

1
2
 
if(S='celibataire')

quand test deux varibles, ou on les compares, il faut qu'ils soient du méme type et ca dans n'importe quel language de programmation
méme chose pour les autres tests

[titeeee]

Envoyé par mohamine1989

if (S='celibataire')

Oui et non. Non parce que dans le programme, il y a celibataire de déclaré de type string. Et oui parce que elle ne s'en sert pas.
Je pense que ça serait mieux de faire un menu du genre "taper 1 pour celibataire". Entre les gens qui taperont Celibataire, Célibataire, celibataire... on va pas s'en sortir

[droggo]

Qua,

Envoyé par titeeee

Oui et non. Non parce que dans le programme, il y a celibataire de déclaré de type string. Et oui parce que elle ne s'en sert pas.
Je pense que ça serait mieux de faire un menu du genre "taper 1 pour celibataire". Entre les gens qui taperont Celibataire, Célibataire, celibataire... on va pas s'en sortir

Oui, c'est ce que je faisais généralement.

En plus, ça simplifie le travail des utilisateurs, ce qui est toujours apprécié.

Sinon, si on tient à l'entrée de mots, je faisais parfois, à la demande de clients rétifs à cette simplification :

- lire le mot
- supprimer les accents ... (é, è deviennent e ...)
- tout passer en minuscules
- à partir de là, on peut comparer avec les mots de référence.
- et si on ne trouve pas de correspondance, on peut compliquer la comparaison, par exemple en cherchant uniquement sur les premières lettres, jusqu'à trouver une partie de mot discriminante.

Et donc, demander des valeurs numériques pour le choix simplifie également le travail du programmeur, ce qui fait que tout le monde est content, sauf certains clients à la logique étrange.

[Paul TOTH]

bon et alors ? on peut calculer nos impôts maintenant ?

[CapJack]

Envoyé par Paul TOTH

bon et alors ? on peut calculer nos impôts maintenant ?

Quarante-deux.
— C'est tout. Il n'y a rien d'autre.

[Paul TOTH]

Envoyé par CapJack

Quarante-deux.
— C'est tout. Il n'y a rien d'autre.

si c'est en euros, ça me va

Sinon je sors ma serviette