# Simulation: 3-mal würfeln

## Problembeschreibung

*******************************************
Dokumentnummer: D1315
*******************************************
Beim dreimaligen Werfen eines Würfels ist die theoretische
Wahrscheinlichkeit, dass die Ziffernsumme mindestens 11 ist
1/2

In einer Simulation wollen wir das testen!

## Problemlösung

n:read("Wie oft soll simuliert werden");

simulation:makelist([random(6)+1,random(6)+1,random(6)+1],i,1,n);

m:length(simulation);

Bestimmung der Teilliste

A:sublist(simulation,lambda([e],e[1]+e[2]+e[3]>=11));

g[A]:length(A);

W[A]:g[A]/m;

%,numer;