# Geburtstag am Wochenende

Die Wahrscheinlichkeit, dass eine Person in diesem Jahr 
an einem Wochenende Geburtstag hat, beträgt 2/7. I
n einem Raum halten sich 10 Personen auf (Darunter sind keine Zwillinge). 
Die Verteilung B(k|2/7; 10) gibt die Wahrscheinlichkeit dafür an, 
dass genau k der Anwesenden in diesem Jahr an einem Wochenende 
Geburtstag haben. 

p:2/7;

n:10;

W(k):=binomial(n,k)*p**k*(1-p)**(n-k);

P:makelist(floor(W(k)*10000+0.5)/10000.0,k,0,n);

m:n*p,numer;

m:floor(m*100+0.5)/100.0;

v:n*p*(1-p),numer;

v:floor(v*100+0.5)/100.0;