Discussion :

[agan2012]

salut à tous
voila un autre exercice a résoudre
Je réfléchi d’abord est je reviens

Vous êtes charger de déterminer le salaire net d’un employer dont le nom et le salaire de base son donnés au moyen de clavier. Sachant :
* une prime est accorder selon le barème suivant
Salaire de base--------------Taux de prime
< 3000 ------------------------0%
]3000,5000]---------------------3%
]5000,10000]--------------------5%
>=10000------------------------7%
* chaque employer et bénéficier des allocations familiales selon le nombre d’enfant :
- 200 dhs/enfant pour les 3 premiers
- 36 dhs/ enfant pour les 3 suivants
-0 dh/a partir du 7eme enfant
* une impôt est retrancher (1.16%) de salaire de base

[agan2012]

salut tout le monde
alors voila mon travail mais je me bloque

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
uses crt;
 
var
    sn,pr:real;
    sb,alf,n,imp,nd,al:integer;
 
 
 
begin
 
write('le nom de l''enployer:    '); readln(n);
 
    if sb<3000 then
       pr:=0      else
    if sb<=5000 then
       pr:=sb*0.03 else
    if sb<10000 then
       pr:=sb*0.05 else
    if sb>=10000 then
       pr:=sb*0.07;
    write('le prime est');
 
 
begin
 
if   nd=3 then
al:=200*3 else
if nd<=6 then
al:=200*3+36*3 else
if  nd<=7 then
al:=200*3+36*3+0;
write('Allocations familiales est:');
end
 
 
 
 imp:=sb*0.16;
sn:=sb+pri+al-imp;
write('Le salaire net est:'sn:6:2); readln(sn);
 
end.

[droggo]

Wao,

C'est pratiquement le même exercice que l'autre, aux données près.

Alors cherche un peu.

[Alcatîz]

Bonjour,

Une saine manière d'envisager le problème sans s'emmêler les pinceaux serait de créer une fonction séparée pour chaque aspect du calcul :

Code :

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

1
2
3
4
5
Function Prime (SalaireDeBase : Real) : Real;
 
Function Allocations (NbEnfants : Integer) : Real;
 
Function Impot (SalaireDeBase : Real) : Real;

Mais je ne sais pas si tu as déjà abordé les procédures et fonctions au cours.

Quoi qu'il en soit, tu dois bien comprendre que tu ne peux effectuer aucun calcul sur des variables non initialisées, sous peine d'obtenir n'importe quoi. C'est malheureusement le cas dans le code que tu as posté.

Autre chose : tu effectues un test inutile :

Code :

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

1
2
3
if sb<10000 then
       pr:=sb*0.05 else
    if sb>=10000 then

car dans la séquence du programme, sb est forcément supérieur ou égal à 10000 au niveau du else.

[agan2012]

Mon problème maintenant c'est comment séparer les conditions entre eux : le prime avec des allocations familiales et également avec l'impôt
Comment faire- je?

[droggo]

Soe,

Mon problème maintenant c'est comment séparer les conditions entre eux : le prime avec des allocations familiales et également avec l'impôt
Comment faire- je?

Et hop, retour d'un leitmotiv :

Comment fais-tu le calcul à la main ?

Ton programme doit faire pareil.