# Die ersten 25 natürlichen Zahlen

## Problembeschreibung

******************************************
Dokumentnummer: D1307
******************************************

Aus den ersten 25 natürlichen Zahlen (ohne 0), wird zweimal eine Zahl 
zufällig ausgewählt (mit Zurücklegen). Wie groß ist die Wahrscheinlichkeit,
dass die Summe der ausgewählten Zahlen
a) durch 3 teilbar,
b) durch 5 teilbar,
c) durch 7 teilbar oder
d) durch 9 teilbar ist?

## Problemlösung

Z:makelist(i,i,1,25);

Z:setify(Z);

S:cartesian_product(Z,Z);

A:subset(S,lambda([e],is(mod(e[1]+e[2],3)=0)));

B:subset(S,lambda([e],is(mod(e[1]+e[2],5)=0)));

C:subset(S,lambda([e],is(mod(e[1]+e[2],7)=0)));

D:subset(S,lambda([e],is(mod(e[1]+e[2],9)=0)));

m:cardinality(S);

g[A]:cardinality(A);

g[B]:cardinality(B);

g[C]:cardinality(C);

g[D]:cardinality(D);

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

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

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

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