Moeda honesta: X = 1 if cara, X = 0 if coroa. Calcule E[X] and Var(X)