Forum de mathématiques - Bibm@th.net
Vous n'êtes pas identifié(e).
- Contributions : Récentes | Sans réponse
Répondre
Résumé de la discussion (messages les plus récents en premier)
- yoshi
- 25-03-2012 11:45:26
Bonjour,
Nouvelle version.
L'algorithme est inchangé
Je n'ai toujours pas exclu les possibilités de vitesses ou de durées identiques (pas de demande).
J'en ai simplement minimisé les occurrences avec :
* des durées s'étageant de de 1/2 h à 6 h par 1/4 h
* des vitesses de 2 km/h ou 2 km/h de 40 à 130 km/h.
Le résultat est bien plus satisfaisant.
Je me suis également astreint à un "exercice de style" dans l'Affichage, à savoir afficher les temps en mesures sexagésimales à la suite des temps décimaux.
Cet affichage est répétitif (présent 2 fois) et ferait fort logiquement l'objet d'une fonction dans un vrai langage de programmation : là, ce n'est pas possible -apparemment, du moins.
2 i EST_DU_TYPE NOMBRE
3 Dtot EST_DU_TYPE NOMBRE
4 Ttot EST_DU_TYPE NOMBRE
5 Vm EST_DU_TYPE NOMBRE
6 Vit EST_DU_TYPE NOMBRE
7 Tps EST_DU_TYPE NOMBRE
8 P_ent EST_DU_TYPE NOMBRE
9 Dec EST_DU_TYPE NOMBRE
10 DEBUT_ALGORITHME
11 AFFICHER " "
12 AFFICHER "*** Calcul de Vitesses moyennes ***"
13 AFFICHER " "
14 Dtot PREND_LA_VALEUR 0
15 Ttot PREND_LA_VALEUR 0
16 AFFICHER " Si un véhicule se déplace :"
17 POUR i ALLANT_DE 1 A 3
18 DEBUT_POUR
19 Tps PREND_LA_VALEUR ALGOBOX_ALEA_ENT(2,24)/4
20 Vit PREND_LA_VALEUR ALGOBOX_ALEA_ENT(20,65)*2
21 AFFICHER "à "
22 AFFICHER Vit
23 AFFICHER " km/h pendant "
24 AFFICHER Tps
25 AFFICHER " h"
26 AFFICHER " (Soit "
27 P_ent PREND_LA_VALEUR FLOOR(Tps)
28 AFFICHER P_ent
29 AFFICHER " h "
30 Dec PREND_LA_VALEUR (Tps-P_ent)*60
31 AFFICHER Dec
32 AFFICHER " min)"
33 Ttot PREND_LA_VALEUR Ttot+Tps
34 Dtot PREND_LA_VALEUR Dtot+Tps*Vit
35 FIN_POUR
36 AFFICHER " "
37 AFFICHER "quelle sera sa vitesse moyenne sur l'ensemble du parcours ?"
38 PAUSE
39 AFFICHER " "
40 AFFICHER " *** Réponse ***"
41 AFFICHER " "
42 AFFICHER "Ce véhicule aura parcouru "
43 AFFICHER Dtot
44 AFFICHER " km "
45 AFFICHER "en "
46 AFFICHER Ttot
47 AFFICHER " h"
48 AFFICHER ", soit en "
49 P_ent PREND_LA_VALEUR FLOOR(Ttot)
50 AFFICHER P_ent
51 AFFICHER " h "
52 Dec PREND_LA_VALEUR (Ttot-P_ent)*60
53 AFFICHER Dec
54 AFFICHER " min"
55 Vm PREND_LA_VALEUR ROUND((Dtot/Ttot)*10)/10
56 AFFICHER " "
57 AFFICHER "Sa vitesse moyenne sera donc de "
58 AFFICHER Vm
59 AFFICHER " km/h à 0.1 km/h près."
60 FIN_ALGORITHME
Résultats :
***Algorithme lancé***
*** Calcul de Vitesses moyennes ***
Si un véhicule se déplace :
à 60 km/h pendant 5.75 h (Soit 5 h 45 min)
à 46 km/h pendant 5.5 h (Soit 5 h 30 min)
à 120 km/h pendant 1.75 h (Soit 1 h 45 min)
quelle sera sa vitesse moyenne sur l'ensemble du parcours ?
***Pause***
*** Réponse ***
Ce véhicule aura parcouru 808 km en 13 h, soit en 13 h 0 min
Sa vitesse moyenne sera donc de 62.2 km/h à 0.1 km/h près.
***Algorithme terminé***
@+
- yoshi
- 21-03-2012 13:05:19
Bonjour,
J'ai opté pour des vitesses de 10 km/h en 10 km/h et des temps de 0,5 h à 6 h.
Définitions aléatoires des données.
Je peux améliorer - à la demande - ce script en faisant en sorte que les 3 vitesses soient différents ainsi que les 3 temps.
J'ai inclus un temporisateur pour permettre le calcul de l'utilisateur puis le contrôle de la réponse après clic sur continuer...
2 i EST_DU_TYPE NOMBRE
3 Dtot EST_DU_TYPE NOMBRE
4 Ttot EST_DU_TYPE NOMBRE
5 Vm EST_DU_TYPE NOMBRE
6 Vit EST_DU_TYPE NOMBRE
7 Tps EST_DU_TYPE NOMBRE
8 DEBUT_ALGORITHME
9 AFFICHER " "
10 AFFICHER "*** Calcul de Vitesses moyennes ***"
11 AFFICHER " "
12 Dtot PREND_LA_VALEUR 0
13 Ttot PREND_LA_VALEUR 0
14 AFFICHER " Si un véhicule se déplace :"
15 POUR i ALLANT_DE 1 A 3
16 DEBUT_POUR
17 Tps PREND_LA_VALEUR ALGOBOX_ALEA_ENT(1,12)/2
18 Vit PREND_LA_VALEUR ALGOBOX_ALEA_ENT(4,13)*10
19 AFFICHER "à "
20 AFFICHER Vit
21 AFFICHER " km/h pendant "
22 AFFICHER Tps
23 AFFICHER " h"
24 Ttot PREND_LA_VALEUR Ttot+Tps
25 Dtot PREND_LA_VALEUR Dtot+Tps*Vit
26 FIN_POUR
27 AFFICHER " "
28 AFFICHER "quelle sera sa vitesse moyenne sur l'ensemble du parcours ?"
29 PAUSE
30 AFFICHER " "
31 AFFICHER " *** Réponse ***"
32 AFFICHER " "
33 AFFICHER "Ce véhicule aura parcouru "
34 AFFICHER Dtot
35 AFFICHER " km "
36 AFFICHER "en "
37 AFFICHER Ttot
38 AFFICHER " h"
39 Vm PREND_LA_VALEUR ROUND((Dtot/Ttot)*10)/10
40 AFFICHER " "
41 AFFICHER "Sa vitesse moyenne sera donc de "
42 AFFICHER Vm
43 AFFICHER " km/h à 0.1 km/h près."
44 AFFICHER " "
45 FIN_ALGORITHME
Résultats :
***Algorithme lancé***
*** Calcul de Vitesses moyennes ***
Si un véhicule se déplace :
à 130 km/h pendant 5.5 h
à 110 km/h pendant 1 h
à 90 km/h pendant 5 h
quelle sera sa vitesse moyenne sur l'ensemble du parcours ?
***Pause***
*** Réponse ***
Ce véhicule aura parcouru 1275 km en 11.5 h
Sa vitesse moyenne sera donc de 110.8 km/h à 0.1 km/h près.
***Algorithme terminé***
@+