ساعدوني تمرين في الباسكال

[بنت عمران]

الرجاء مساعدتي بهذا التمرين و هو كتابة برنامج في الـــ pascal و هذا هو التمرين :
engendrer un echantillon de la variable aleatoire X qui suit la loi d'Erlang d'ordre 4 (la taille de echantillon n=30 ). A PARTIR DE cet echantillon ; estimer la moyenne et la variance de population correspondantes
*la Solution Mathematique :
Algo:
1) generer{ui} 1<i<k U[0;1] ; هنا قلتلنا استعملو RANDOM
2) poser X:=-1/lamda*Ln(produit ui) tel que 1<i<k
* la moyenne :
X(bar)=1/n ∑xi la somme ( i=1 ti n=30) . و قتلنا نحسبوا
x(bar)1 ....x(bar)5 ; وكل x(bar)) فاها من x1......x30
estimateur de la moyenne
Y(bar)=1/m ∑[x(bar]puissance j la somme( j=1 to m=10)
estimateur de la variance :
VAR(X)=1/m-1 ∑([Y(bar)]puissance j –[Y(bar)])