\def{text n=randint(40,50,60,70)}
\def{text a=slib(stat/binomial \n,30,1/2)}
\def{text a=wims(declosing \a)}
\for{i=1 to \n}{\if{item(\i,\a)>30}{\text{a=wims(replace item number \i by 25 in \a)}}}
\def{text tableau= <table bgcolor="skyblue"
 align="center">}
\for{ i=0 to ceil(\n/10)}{
\def{text tableau= \tableau <tr align="center">}
	\for{ j=1 to 10}{ 
	\if{ 10*\i+\j <=\n }{\def{real u=item(10*\i+\j, \a)+160}
\def{text tableau= \tableau <td> &nbsp;&nbsp;  \u &nbsp; &nbsp; </td>}
	}}
\def{text tableau= \tableau </tr>}
}
\def{text liste=[0,5,10,15,20,25,30]}
\def{text liste2=[160,165,170,175,180,185,190]}
\def{text tableau=\tableau </table>}
\def{text d=slib(stat/freq [\a],\liste)}
\def{text d=item(1,\d)}
\def{text c=slib(stat/effectif [\a],\liste)}
\def{text c=item(1,\c)}
\def{text b=pari(print(\c/\n))}

\def{text cc=pari(print(5*\c))}
\def{text c=wims(declosing \c)}
\def{text b=wims(declosing \b)}
\def{real freq1=ceil(item(1,\b)*1000)/10}
\def{real freq2=ceil(item(2,\b)*1000)/10}
\def{real freq3=ceil(item(3,\b)*1000)/10}
\def{real freq4=ceil(item(4,\b)*1000)/10}
\def{real freq5=ceil(item(5,\b)*1000)/10}
\def{real freq6=ceil(item(6,\b)*1000)/10}
\def{text eff1=item(1,\c)}
\def{text eff2=item(2,\c)}
\def{text eff3=item(3,\c)}
\def{text eff4=item(4,\c)}
\def{text eff5=item(5,\c)}
\def{text eff6=item(6,\c)}
\def{text histo=slib(stat/histo [\cc],\liste2,ytics 5,xtics)}
\reload{<img src="gifs/doc/etoile.gif" alt="rechargez" 
width="20" height="20"> } Les tailles arrondies  un nombre entier de centimtres
des \n garons d'un club de football sont les suivantes : 

<p>
\tableau

L'analyse statistique de ces donnes permet de remplir le tableau suivant : 
<table align="center" border=1>

<tr align="center"><th>Tailles</th>
<td>\(\lbrack 160,165 \lbrack)</td>
<td>\(\lbrack 165,170 \lbrack)</td>
<td>\(\lbrack 170,175 \lbrack)</td>
<td>\(\lbrack 175,180 \lbrack)</td>
<td>\(\lbrack 180,185 \lbrack)</td>
<td>\(\lbrack 185,190 \lbrack)</td>
</tr>

<tr align="center"><th>Effectif</th>
<td>\eff1</td>
<td>\eff2 </td>
<td>\eff3 </td>
<td>\eff4 </td>
<td>\eff5 </td>
<td>\eff6</td>
</tr>

<tr align="center"><th>Frquence (%)</th>
<td>\freq1 </td>
<td>\freq2 </td>
<td>\freq3 </td>
<td>\freq4 </td>
<td>\freq5 </td>
<td>\freq6 </td>
</tr>
</table>
et voici l'histogramme des effectifs
\draw {400,200}{\histo}

\comment{\def{text centre= 162.5,167.5,172.5,177.5,182.5,187.5}
<span class="defn">L'amplitude des classes </span> est de 5. 
Les centres des classes sont  \centre.
}
