Muestra la media

Datos = Sequence(s, s, 2.0, 12.0, 1.0)
Dado2 = Sequence(Random[1.0, 6.0], s, 1.0, 100.0)
Dado1 = Sequence(Random[1.0, 6.0], s, 1.0, 100.0)
Suma: Dado1 + Dado2
Frecuencias = Sequence(CountIf[x ≟ s, Suma], s, 2.0, 12.0)
Barras = BarChart(Datos, Frecuencias, 0.2)
m = Mean(Suma)
polígono1, a, b, c = Polygon((m, 0.0), (m - 0.5, -1.0 * 2.0), (m + 0.5, -1.0 * 2.0))
texto1: "Media = " + m
d = true