PREMIOS

0 €

3 €

12 €

Tu premio es de: 

Premio de 12 €

Premio de 3€

Sin premio

Valor medio del premio: 

Apuesta y ganancia

Valor medio del premio

Simulador

Arco manzana

Arcos limones

Arcos cerezas

Exploración

Simulación

Solución

Exploración

Simulación

Solución

n1 = 500 (slider from 1 to 5000, step 1)
C = (0.8200000000000001, 5.22)
B = (0.78, 5.66)
f = Circle(B, C)
D = Point(f)
g = CircleArc(B, C, D)
a = 413.3 (slider from 0 to 500, step 0.1)
giro: ((2 * 3.141592653589793) * random()) + a - a + g - g
A = (9.76, 0.08)
P1 = Rotate(A - (3.99, 4.01), giro + (6 * 3.141592653589793), A)
P2 = Rotate(P1, 90*°, A)
u = Vector(A + (0, 5), A + (0, 4))
tapete, b, c, d, e = Polygon(A + ((-5), (-5)), A + (5, (-5)), A + (5, 5.5), A + ((-5), 5.5))
premio = If((giro  <  (6 * 3.141592653589793 / 12)) ∧ (giro > (2 * 3.141592653589793 / 12)), 12, If[(giro  <  (14 * 3.141592653589793 / 12)) ∧ (giro > (10 * 3.141592653589793 / 12)) ∨ (giro > (18 * 3.141592653589793 / 12)) ∧ (giro  <  (22 * 3.141592653589793 / 12)), 3, 0])
n: round(n1)
listagiros = Sequence(((2 * 3.141592653589793) * random()) + a - a + k - k + g - g, k, 1, n)
listapremios = Sequence(If[(Element[listagiros, k]  <  (6 * 3.141592653589793 / 12)) ∧ (Element[listagiros, k] > (2 * 3.141592653589793 / 12)), 12, If[(Element[listagiros, k]  <  (14 * 3.141592653589793 / 12)) ∧ (Element[listagiros, k] > (10 * 3.141592653589793 / 12)) ∨ (Element[listagiros, k] > (18 * 3.141592653589793 / 12)) ∧ (Element[listagiros, k]  <  (22 * 3.141592653589793 / 12)), 3, 0]], k, 1, n)
Premio12 = CountIf(x ≟ 12, listapremios)
Premio3 = CountIf(x ≟ 3, listapremios)
Premio0 = CountIf(x ≟ 0, listapremios)
ap = 2.5 (slider from 0 to 5, step 0.05)
z = 2 (slider from 0 to 2, step 1)
Basenum = (0.24, -3.08)
texto3: "" + Premio12 + " veces (" + ((Premio12 * 100 / n)) + "%)"
texto4: "" + Premio3 + " veces (" + ((Premio3 * 100 / n)) + "%)"
texto5: "" + Premio0 + " veces (" + ((Premio0 * 100 / n)) + "%)"
texto18: "Número de jugadas: n = " + n
texto19: " \frac{ " + Premio12 + "}{" + n + " } \; · \; 12 \; + \;  \frac{" + Premio3 + " }{" + n + " } \;· \; 3 \;  + \;  \frac{ " + Premio0 + " }{" + n + " } \;· \; 0 \;  = \; " + (Sum[listapremios] / n) + " \; € \; por \; jugada"
ag = false
vm = false
listapuntosdiana = Sequence(Rotate[A + (4, 0), ((k * 60))°, A], k, 1, 6)
E = (13.66, 0.04)
F = (11.68, 3.54)
G = (7.72, 3.5)
H = (5.68, 0.04)
I = (7.7, -3.38)
J = (11.64, -3.4)
t = Circle(A, 4)
sector1 = Sector(t, Element[listapuntosdiana, 1], Element[listapuntosdiana, 2])
sector3 = Sector(t, Element[listapuntosdiana, 3], Element[listapuntosdiana, 4])
sector2 = Sector(t, Element[listapuntosdiana, 2], Element[listapuntosdiana, 3])
sector4 = Sector(t, Element[listapuntosdiana, 4], Element[listapuntosdiana, 5])
sector5 = Sector(t, Element[listapuntosdiana, 5], Element[listapuntosdiana, 6])
sector6 = Sector(t, Element[listapuntosdiana, 6], Element[listapuntosdiana, 1])
arco1 = CircleArc(A, Element[listapuntosdiana, 1], Element[listapuntosdiana, 2])
arco2 = CircleArc(A, Element[listapuntosdiana, 2], Element[listapuntosdiana, 3])
arco3 = CircleArc(A, Element[listapuntosdiana, 3], Element[listapuntosdiana, 4])
arco4 = CircleArc(A, Element[listapuntosdiana, 4], Element[listapuntosdiana, 5])
arco5 = CircleArc(A, Element[listapuntosdiana, 5], Element[listapuntosdiana, 6])
arco6 = CircleArc(A, Element[listapuntosdiana, 6], Element[listapuntosdiana, 1])
man = false
lim = false
cer = false
listaradiosdiana = Sequence(Segment[A, Element[listapuntosdiana, k]], k, 1, 6)
texto17: "Apuesta: " + ap + " €"
cereza = 0 (slider from 0 to 15, step 0.1)
limon = 3 (slider from 0 to 15, step 0.1)
manzana = 12 (slider from 0 to 15, step 0.1)
texto22: "" + cereza + " €"
texto23: "" + limon + " €"
texto24: "" + manzana + " €"
premiomed: (1 / 6 * manzana) + (1 / 3 * limon) + (1 / 2 * cereza)
texto21: " \frac{ 1}{6} \; · \;" + manzana + " \; + \;  \frac{1}{3} \;· \;" + limon + " \;  + \;  \frac{ 1 }{2 } \;· \;" + cereza + " \;  = \;" + premiomed + " \;  € \; por \; jugada"
texto6: "Beneficio obtenido, por término medio : " + ((n * ap) - Sum[listapremios]) + " €"
texto25: "Ganancia media: " + (ap - premiomed) + " € por jugada"