restart;K:=200*0.15;

NiM+SSJLRzYiJCIlK0khIiM=

hyper:=(N,K,n,k)->evalf((binomial(K,k)*binomial(N-K,n-k))/binomial(N,n));

NiM+SSZoeXBlckc2ImYqNiZJIk5HRiVJIktHRiVJIm5HRiVJImtHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JJmV2YWxmR0kqcHJvdGVjdGVkR0YxNiMqKC1JKWJpbm9taWFsR0YlNiQ5JTknIiIiLUY1NiQsJjkkRjlGNyEiIiwmOSZGOUY4Rj5GOS1GNTYkRj1GQEY+RiVGJUYl

100*hyper(200,30,20,5);

NiMkIisnW1lNLSIhIik=

100*(1-sum(hyper(200,30,20,i),i=0..11));

NiMkIiU0JSkhIik=

100*(sum(hyper(200,30,20,i),i=0..4));

NiMkIisqXFheUykhIik=

Tardy:= (x) -> evalf(product((170-i)/(200-i), i=0..x-1));

NiM+SSZUYXJkeUc2ImYqNiNJInhHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JJmV2YWxmR0kqcHJvdGVjdGVkR0YuNiMtSShwcm9kdWN0RzYkRi5JKF9zeXNsaWJHRiU2JComLCYiJHEiIiIiSSJpR0YlISIiRjgsJiIkKyNGOEY5RjpGOi9GOTsiIiEsJjkkRjhGOkY4RiVGJUYl

100*Tardy(20);

NiMkIitXS3NOSyEiKg==

restart;binom:=(n,p,k)->binomial(n,k)*p^k*(1-p)^(n-k);

NiM+SSZiaW5vbUc2ImYqNiVJIm5HRiVJInBHRiVJImtHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJSooLUkpYmlub21pYWxHRiU2JDkkOSYiIiIpOSVGM0Y0KSwmRjRGNEY2ISIiLCZGMkY0RjNGOUY0RiVGJUYl

100*binom(250,0.39,100);

NiMkIitaIzRCKVshIio=

100*(sum(binom(250,0.39,i),i=0..225));

NiMkIisrKysrNSEiKA==

plot(binom(250,0.39,x), x=97..98);

LSUlUExPVEc2Ji0lJ0NVUlZFU0c2JDdTNyQkIiMoKiIiISQiM1k9cmVSRlZoXiEjPjckJCIzR21tVDooekBxKiEjOyQiM1tgM05lczlpXkYvNyQkIjN1TGU5dWkyLygqRjMkIjMmXGwmcHJidGleRi83JCQiM1FtO3pfIjRpcSpGMyQiMzwkM3hqMWdMOyZGLzckJCIzRG07YXBoTjMoKkYzJCIzK2guZiYqKltSOyZGLzckJCIzJ1IkZSo9KUhcNSgqRjMkIjNAP1B2aWJca15GLzckJCIzMm4iei8zdUNyKkYzJCIzITN1JSlILm5cOyZGLzckJCIzXitESiRSRFhyKkYzJCIzZVxvVFklPmE7JkYvNyQkIjMoZjt6UidvazsoKkYzJCIzJio9JClIWyFcZTsmRi83JCQiM2UrRDFKOnc9KCpGMyQiM3Qjb15YX1FpOyZGLzckJCIzQExMM0VuJDRzKkYzJCIzc155RyF5KWZtXkYvNyQkIjM3bTsvUkUmR3MqRjMkIjMkPk8mUSE9IylvOyZGLzckJCIzIioqKipcS100XXMqRjMkIjNNZSFwMEBqcjsmRi83JCQiM2YqKipcUEF2cnMqRjMkIjNEZzI7JClbU25eRi83JCQiM1gqKipcbkhpI0goKkYzJCIzSCFwcHJPKmZuXkYvNyQkIjNHbiJ6KmV2OkooKkYzJCIzJ0h0IlI3THVuXkYvNyQkIjMmSEwkMzQ3VEwoKkYzJCIzN253PDVTKHk7JkYvNyQkIjMnSExMak0/YHQqRjMkIjNnTCwyTC4mejsmRi83JCQiM2srRCJvN1R2dCpGMyQiM0VGIkg+VSoqejsmRi83JCQiMyRRTExRKm9dUigqRjMkIjNSJ1IqKiplcytvXkYvNyQkIjNIK0QiPWxqO3UqRjMkIjNGPCEqbyNReHo7JkYvNyQkIjMjKSpcUGFSPFB1KkYzJCIzWiE9Z3leNno7JkYvNyQkIjN0SyRlOUVnZXUqRjMkIjNcME4tKilRIXk7JkYvNyQkIjNfTGVSIjNHeXUqRjMkIjMnZW1GMjFxdzsmRi83JCQiMzpuOy9UMSYqXCgqRjMkIjNcYi5DZSIpW25eRi83JCQiM1ltInpSUWJAdipGMyQiMzFaL1ljekRuXkYvNyQkIjM7K3Y9PlkyYSgqRjMkIjMleStZZU1CcTsmRi83JCQiMyhmbSJ6WHU5YygqRjMkIjM1LiE9Qj5NbjsmRi83JCQiM1cqKioqXHkpKUdlKCpGMyQiM0UwKlwncGtSbV5GLzckJCIzOitdaV9RUWcoKkYzJCIzKT1AWTV0Rmc7JkYvNyQkIjNgKlw3eSUzVGkoKkYzJCIzOUwlKVFyW2psXkYvNyQkIjN4KipcUCFbaFl3KkYzJCIzYE52UCtyOmxeRi83JCQiM3pLTCRReCRvbSgqRjMkIjN4bW5NMDBwa15GLzckJCIzIikqKipcUCtWKW8oKkYzJCIzOG9camZMOmteRi83JCQiMyZmO3pwZSp6cSgqRjMkIjNBKT04Tio9ampeRi83JCQiMyEpKioqXCNcJ1FIeCpGMyQiMyhIJVwqRy1DSTsmRi83JCQiMytMZTlTOCZceCpGMyQiM0ZmSCVIMDtDOyZGLzckJCIzPitEMSM9YnF4KkYzJCIzMicqKVxJQ1Y8OyZGLzckJCIzUExMM3M/NnooKkYzJCIzVVUtNysnWzU7JkYvNyQkIjNpK0RKWGFFInkqRjMkIjNLKFw+bE4jR2deRi83JCQiMz5ubW0qUlJMeSpGMyQiM3M3Wic+bTEmZl5GLzckJCIzMG47YTwuWSZ5KkYzJCIzLF5vMWFebmVeRi83JCQiMyhHJGU5dE9jKHkqRjMkIjNKOVRRYkIieTomRi83JCQiM1cqKioqXFFrXCp5KkYzJCIzaUVJYk1nKXA6JkYvNyQkIjNPTCQzZGc2PHoqRjMkIjNVO2FfVyYqKmY6JkYvNyQkIjM7bW1teEdwJHoqRjMkIjMjKTRNeWI6M2JeRi83JCQiMyMqKlw3b0swZXoqRjMkIjMsKHpwOnNsUzomRi83JCQiM28rdj01cyN5eipGMyQiM2AsST9LdzBgXkYvNyQkIiMpKkYsJCIzamE+IiopR04+OiZGLy0lJkNPTE9SRzYmJSRSR0JHJCIjNSEiIiRGLEZhW2xGYltsLSUrQVhFU0xBQkVMU0c2JFEieDYiUSFGZ1tsLSUlVklFV0c2JDskIjEtKysrKysrKCohIzlGZ3o7JCIyYz81JlxRaF5eISM9JCIxWTZTKXBHJG9eISM8LSUlRk9OVEc2JCUqSEVMVkVUSUNBR0ZgW2w=

100*binom(250,0.39,97);

NiMkIitTRlZoXiEiKg==

100*binom(250,0.39,98);

NiMkIishSE4+OiYhIio=

restart;lambda:=1000/60;

NiM+SSdsYW1iZGFHNiIjIiNdIiIk

pois:=(lambda,k)->evalf(exp(-lambda)*(lambda^k/k!));

NiM+SSVwb2lzRzYiZio2JEknbGFtYmRhR0YlSSJrR0YlRiU2JEkpb3BlcmF0b3JHRiVJJmFycm93R0YlRiUtSSZldmFsZkdJKnByb3RlY3RlZEdGLzYjKigtSSRleHBHRiU2IywkOSQhIiIiIiIpRjY5JUY4LUkqZmFjdG9yaWFsR0YvNiNGOkY3RiVGJUYl

100*pois(lambda,20);

NiMkIiskW1lhXCchIio=

100*(sum(pois(lambda,i),i=0..19));

NiMkIisrZSYpR3chIik=

100*(1-sum(pois(lambda,i),i=0..30));

NiMkIilLd3M1ISIp

restart;binom:=(n,p,k)->evalf(binomial(n,k)*p^k*(1-p)^(n-k));

NiM+SSZiaW5vbUc2ImYqNiVJIm5HRiVJInBHRiVJImtHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JJmV2YWxmR0kqcHJvdGVjdGVkR0YwNiMqKC1JKWJpbm9taWFsR0YlNiQ5JDkmIiIiKTklRjdGOCksJkY4RjhGOiEiIiwmRjZGOEY3Rj1GOEYlRiVGJQ==

100*binom(150,11/210,10);

NiMkIit6SEpRKCohIio=

p:=18/210+19/210+20/210;

NiM+SSJwRzYiIyIjPiIjcQ==

100*binom(150,p,33);

NiMkIis2dHhcRiEiKg==

p:=1/210+3/210+5/210+7/210+11/210+13/210+17/210+19/210;

NiM+SSJwRzYiIyIjUSIkMCI=

100*binom(150,p,43);

NiMkIitTLCkqcDUhIio=

sum(i/210,i=1..20);

NiMiIiI=

restart;jahr:=24*365;

NiM+SSVqYWhyRzYiIiVnKCk=

ausfall_h:=evalf(8*10^(-4)*jahr/1000);

NiM+SSphdXNmYWxsX2hHNiIkIisrKyszcSEjNw==

ausfall:=100/jahr*ausfall_h;

NiM+SShhdXNmYWxsRzYiJCIrKysrKyEpISM5

verfuegbar:=100-ausfall;

NiM+SSt2ZXJmdWVnYmFyRzYiJCIrKz8qKioqKiohIik=

restart;binom:=(n,p,k)->evalf(binomial(n,k)*p^k*(1-p)^(n-k));

NiM+SSZiaW5vbUc2ImYqNiVJIm5HRiVJInBHRiVJImtHRiVGJTYkSSlvcGVyYXRvckdGJUkmYXJyb3dHRiVGJS1JJmV2YWxmR0kqcHJvdGVjdGVkR0YwNiMqKC1JKWJpbm9taWFsR0YlNiQ5JDkmIiIiKTklRjdGOCksJkY4RjhGOiEiIiwmRjZGOEY3Rj1GOEYlRiVGJQ==

100*(1-binom(500,1/365,0));

NiMkIitpYk5qdSEiKQ==