EquationSymbolicSolveRequest[List[Equal[Product[x,y],3]],List[x]]Solution[{x,ExpressionSetPoint[ExpressionWithCondition[Divide[3,y],NotEqual[y,0]],False,ReservedReal]}]1Eq.1Var.1Inst.19EquationSymbolicSolveRequest[List[Equal[Product[x,y],3]],List[y]]Solution[{y,ExpressionSetPoint[ExpressionWithCondition[Divide[3,x],NotEqual[x,0]],False,ReservedReal]}]1Eq.1Var.1Inst.19GraphingPlotEq2D[Equal[Product[x,y],3]]GraphingShow3D[PlotEq3D[Equal[Product[x,y],3]],Options[Option[ShowWireframe,false],Option[ViewAngle,7.604,-149.946,86.142]]]EquationSymbolicSolveRequest[List[Equal[Product[2,y],3]],List[y]]Solution[{y,ExpressionSetPoint[3/2,False,ReservedReal],1.5}]1Eq.1Var.1Inst.19EquationSymbolicSolveRequest[List[Equal[Product[90,y],3]],List[y]]Solution[{y,ExpressionSetPoint[1/30,False,ReservedReal],0.0333333333333}]1Eq.1Var.1Inst.19EquationSymbolicSolveRequest[List[Equal[Product[12,y],3]],List[y]]Solution[{y,ExpressionSetPoint[1/4,False,ReservedReal],0.25}]1Eq.1Var.1Inst.19