Le Hockey est le sport national du Québec! Quand on regarde les statistiques d'un gardien de buts, rien n'est plus frustrant que d'avoir des nombres incongrus de chiffres et de ne pas en comprendre la signification et leur origine. En prenant pour acquis les statistiques suivantes du début de saison 2006-2007 des gardiens de buts de l'équipe de hockey Canadiens de LNH:
| No. | Nom | PJ | Minute jouer | Victoire | Défaite | DP | Blanchissage | BC | TIRS | %ARR | MOY |
|---|---|---|---|---|---|---|---|---|---|---|---|
| 30 | David Aebischer | 14 | 791:21:00 | 7 | 5 | 2 | 0 | 39 | 424 | 0,908 | 2,96 |
| 39 | Cristobal Huet | 28 | 1586:34:00 | 16 | 6 | 3 | 2 | 62 | 889 | 0,930 | 2,35 |
A l'aide du code source Modula-2 suivant, vous trouverez la réponse que vous souhaitez:
MODULE hockey;
FROM InOut IMPORT WriteString, WriteLn;
FROM SRealIO IMPORT WriteReal;
PROCEDURE MoyenEfficaciter(ButTotal:INTEGER;MinuteTotalJouer:REAL):REAL;BEGIN
RETURN FLOAT(ButTotal)/(MinuteTotalJouer/60.0);
END MoyenEfficaciter;
PROCEDURE PourcentageArret(TotalMatch,TotalLancer,ButTotal:INTEGER;MinuteTotalJouer:REAL):REAL;BEGIN
RETURN ((FLOAT(TotalLancer)/FLOAT(TotalMatch))-MoyenEfficaciter(ButTotal,MinuteTotalJouer))/(FLOAT(TotalLancer)/FLOAT(TotalMatch));
END PourcentageArret;
BEGIN
WriteString("Moyenne d'efficacité: ");
WriteReal(MoyenEfficaciter(39,791.0),10);
WriteLn;
WriteString("Moyenne d'efficacité: ");
WriteReal(MoyenEfficaciter(62,1586.0),10);
WriteLn;
WriteString("Pourcentage d'arrêt: ");
WriteReal(PourcentageArret(14,424,39,791.0),10);
WriteLn;
WriteString("Pourcentage d'arrêt: ");
WriteReal(PourcentageArret(27,889,62,1586.0),10);
WriteLn;
END hockey.
on obtiendra le résultat suivant:
Moyenne d'efficacité: 2.9582806573957Moyenne d'efficacité: 2.34552332912989
Pourcentage d'arrêt: 0.902320921689765
Pourcentage d'arrêt: 0.928763633423502
Dernière mise à jour : Mercredi, le 15 octobre 2014