next up previous contents index
suivant: Codage monter: Exercices de combinatoire précédent: Le programme   Table des matières   Index

Un exercice

On tire 100 fois de suite au hasard de façon équiprobable un entier p parmi 1, 2..100 et on note np le nombre de fois où il a été tiré.
Écrire un programme qui représente les points p, np On tape :
tirage():={
local p,np,j,L,P;
L:=0$(j=1..100)
pour j de 0 jusque 99 faire
p:=rand(100);
L[p]:=L[p]+1;
fpour;
P:=NULL;
pour p de 0 jusque 99 faire
np:=L[p];
si np!=0 alors P:=P,point(p+1+i*np); fsi; 
fpour;
print(max(L));
retourne P;
}:;
On tape tirage()
On obtient :

Image tirage


Documentation de giac écrite par Renée De Graeve