function Cbin(n,k) {if(k>n/2) k=n-k; CB=1;
  for(j=0;j<k;j=j+1) CB=CB*(n-j)/(k-j); return CB}
dato = new Array; freq = new Array; n = 6
dati=0; for(i=0; i<=n; i=i+1) { dato[i]=i
freq[i]=Cbin(n,i)*Math.pow(1/8,i)*Math.pow(7/8,n-i); dati=dati+freq[i]}
tot=0; for(i=0;i<=n;i=i+1) tot=tot+dato[i]*freq[i]
media = tot/dati
document.write("totale = " + tot + ", media = "+ media)
tot=0; for(i=0;i<=n;i=i+1) tot=tot+Math.pow(dato[i]-media, 2)*freq[i]
varianza = tot/dati
document.write("<br>varianza = " + varianza)
document.write(", sqm = " + Math.sqrt(varianza))

totale = 0.75, media = 0.75, varianza = 0.65625, sqm = 0.8100925873009825