p=0.2;
y=rand(1)
compteur=1;
while y>=p do
    compteur=compteur+1;
    y=rand(1);
  end
  compteur
  
