n=5;
while 1 -cdfbin("PQ",4,n,1/6,5/6)<=0.9
    n=n+1
end
afficher(n)