\title{Vitesse}
\language{fr}
\range{-5..5}
\author{Karine MAURICE et Bernadette PERRIN-RIOU}
\email{kreen.maurice@free.fr,bpr@math.u-psud.fr}
\computeanswer{no}
\format{html}
\precision{100}

\integer{h=randint(7..11)}
\integer{hr=randint(\h+1..\h+4)}
\integer{t1=randint(5..58)}
\integer{v1=randint(45..100)}
\integer{t2=randint(5..58)}
\integer{v2=randint(45..100)}
\integer{t3=randint(5..58)}
\integer{v3=randint(45..100)}

\real{d1=ceil(\v1*\t1/60*100)/100}
\real{d2=ceil(\v2*\t2/60*100)/100}
\real{d3=ceil(\v3*\t3/60*100)/100}
\real{d=ceil((\d1+\d2+\d3)*100)/100}
\real{tmin=\t1+\t2+\t3}

conversion de l'heure exprimée en minutes, en heure/minute
\integer{t=floor(\tmin/60)}
\integer{th=floor(\t)}
\integer{tm=\tmin-60*\th}
\integer{tha=\th+\h}

\real{v=ceil((\d/(\tmin/60))*100)/100}

\text{liste= oui,non}
\text{rep=\hr>\h+\t?item(1,\liste):item(2,\liste)}
\text{liste1=pendant \t1 minutes à une vitesse de \v1 km/h, pendant \t1
 minutes durant \d1 km, pendant \d1 km à une vitesse de \v1 km/h}
\text{liste2=pendant \t2 minutes à une vitesse de \v2 km/h, pendant \t2
 minutes durant \d2 km, pendant \d2 km à une vitesse de \v2 km/h}
\text{liste3=pendant \t3 minutes à une vitesse de \v3 km/h, pendant \t3
 minutes durant \d3 km, pendant \d3 km à une vitesse de \v3 km/h}
\text{portion1=randitem(\liste1)}
\text{portion2=randitem(\liste2)}
\text{portion3=randitem(\liste3)}

\steps{reply1
reply2
reply3
choice1}

\statement{
Monsieur Rapide part de Paris à \h h00 et roule d'abord \portion1, 
puis \portion2, et enfin \portion3.
<p>
\if{\step=1}{Combien de kilomètres a-t-il parcouru (par excès à 0.01 près)? }
\if{\step>=2}{Il a parcouru \d km.}
\if{\step=2}{<p>Combien de temps son trajet a-t-il duré?}
\if{\step>=3}{Son trajet a duré \th h \tm mn.}
\if{\step=3}{<p>Quelle est sa vitesse moyenne sur la totalité du parcours? }
\if{\step>=4}{Sa vitesse moyenne sur la totalité du parcours est \v km/h.}
\if{\step=4}{<p>Il a rendez-vous à \hr h00. Sera-t-il à l'heure? \embed{choice1}}
<p><b><font color="purple">Consigne : mettre les unités :par exemple 3  km, 5 km/s , 1h 32min (laisser un espace).
</font></b>}

\hint{
\if{\step=1}{On calcule la distance à partir du temps de parcours 
(en heures) et de la vitesse par la relation suivante : \(d=v*t)}
\if{\step=2}{Le fait qu'il soit ou non à l'heure dépend de son heure d'arrivée 
et donc de son temps de trajet}
}


\answer{Distance parcourue}{\d km}{type=units}
\answer{Temps de parcours}{\th h \tm min}{type=units}
\answer{Vitesse moyenne}{\v km/h}{type=units}
\choice{}{\rep}{\liste}

\feedback{\step>=4 \choice1 notsametext \rep}{Son temps de trajet est de \th h \tm min. Il arrive 
donc à \tha h \tm min, ce qui est bien \if{\hr>=\h+\t}{avant}{après}
son heure de rendez-vous. }
