# Binomialverteilung

## Problembeschreibung

*******************************************
Dokumentnummer: D1150
Quelle: Johann Weilharter,
             Stochastik
******************************************

Von einer Binomialverteilung kennt man n und p,
sowie die Untergrenze a und die Obergrenze b.

Die kumulierte Wahrscheinlichkeit über diesen Bereich
ist gesucht.

## Problemlösung

EINGABE

n:read("Gib den Parameter n ein");

p:read("Gib die Wahrscheinlichkeit p ein");

a:read("Gib die Untergrenze ein");

b:read("Gib die Obergrenze ein");

VERARBEITUNG

k:makelist(i,i,a,b);

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

p:makelist(P(i),i,a,b);

n:length(p);

s:sum(p[i],i,1,n);

ausgabe:[transpose(k),transpose(p)]$

AUSGABE

print(ausgabe)$

print("P(",a,"<= k <=",b,") =",s)$