Computing the Newton polytope of the discriminant from the fiber polytope. Separating element computation for the rational univariate representation with short coefficients in zero-dimensional algebraic varieties 