Answer:
Expr => Minus
Minus => Blank 1(Division, Minus) | Division
Division => Div(Blank 2(Term, Term)) | Term
Term => Const(Double) | Blank 3 ~ Minus ~ Blank 4
Filling the blanks with the possible values as per precedence rules:
Expr => Minus
Minus => Div(Division, Minus) | Division
Division => Div(("(", Term, ")")) | Term
Term => Const(Double) | "(" ~ Minus ~ ")"