p = input("Give a probability between 0 and 1 p=");

for n = 1:3:100
   x=0:n;
   y=binopdf(x,n,p);
   plot(x,y)
   pause(0.5)

  endfor