Computing the Newton polytope of the discriminant from the fiber polytope. Groupe de Brauer et topologie des variétés algébriques complexes lisses. (Brauer group and topology of smooth complex algebraic varieties) 