补集计数法

GeoGebra 命令及参数

1. Random(1, 2) → ptype
2. Random(4, 10) → b
3. Random(4, 10) → a
4. Element({b^(3) / (a + b)^(3), Binomial[b, c] / Binomial[a + b, c]}, ptype) → allblue
5. Element({a^(3) / (a + b)^(3), Binomial[a, c] / Binomial[a + b, c]}, ptype) → allred
6. Textfield(ans) → inputBox1
7. RandomElement({"Not Quite", "Try Again"}) → eres
8. If((ans - cans)^(2) < 0.001, true, false) → acor
9. RandomElement({"Good Job", "Great!", "Way to Go!", "Awesome"}) → text5
10. Element(sellist, ptype) → rtype