La commande ci-dessous (à recopier telle quelle dans Mathematica)
permet de calculer sa moyenne pour un cours dont le barême est de
:
30 % pour l'intra, 50 % pour le final et 20 % pour les TP
(devoirs)
avec :
Recopiez tel quel le texte ci-dessous dans Mathematica:
notedecours[intra_,final_,tp_]:= Module[{exa,min,note1,note2},
exa = N[3/8 intra + 5/8 final];
min = Min[{exa,50}];
note1 = .3 intra + .5 final + .2 Max[{exa,tp}];
note2 = .3 intra + .5 final + .1 (exa + tp);
If[min >= 50,note1,note2]]
Testez la commande sur l'exemple suivant:
notedecours[40,45,100] .
On trouve environ 48.8 % comme résultat, alors
que le calcul habituel de la moyenne donnerait 54.5 % (.3 40 + .5 45 +
.2 100).
Par contre, de bons examens contribuent à augmenter la moyenne des
devoirs.
Par exemple, notedecours[80,72,40] donne 75 % comme note de cours au
lieu de 68 %, même si la note de TP est faible!
Retour à ma page
personnelle