Ein Würfel wird zweimal geworfen.
Man berechne die Wahrscheinlichkeiten für folgende
Ereignisse:
a) zwei gleiche Augenzahlen
b) zwei verschiedene Augenzahlen

W:{1,2,3,4,5,6};

S:cartesian_product(W,W);

Gleiche Augenzahlen

G:subset(S,lambda([e],is(e[1]=e[2])));

Verschiedene Augenzahlen

V:subset(S,lambda([e],is(e[1]#e[2])));

Variante für verschiedene Augenzahlen

V:setdifference(S,G);

m:cardinality(S);

g[G]:cardinality(G);

g[V]:cardinality(V);

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

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

Summenprobe

W[G]+W[V];