Computing the Newton polytope of the discriminant from the fiber polytope. Introduction à la théorie des singularités. I: Singularités et monodromie. (Introduction to the theory of singularities. I: Singularities and monodromy) 