две безпристрастни монети се хвърлят . каква е вероятността да се получат две глави ?
"s   hh , ht , th , tt  e  случай на получаване на 2 глави e   tt  p ( e )  1 / 4 отговорът е b"
negate_prob(divide(const_1, power(const_2, const_3)))