[?] Make a program that gives the volume of the requested solid?

Questions
, , ,
1

I need to make the program able to show to the user the volume of the resulting solid if requested by the user.

2

Towards the end of the definition of cortes, replace ineq with

Row[{ineq, ", volume = ", 
  RegionMeasure[
   ImplicitRegion[
    eqn[x, y, 
     z], {{x, xmin, xmax}, {y, ymin, ymax}, {z, zmin, zmax}}]]}]
3

Thank you very much for your help. But i dont really understood what you mean by replace ineq with…
I put your sentence inside Manipulate and dont urdenstand whats going on.

4

Thank you very much for your help. But i dont really understood what you mean by replace ineq with…
I put your sentence inside Manipulate and dont urdenstand whats going on. I send and image showing where i put the code and showing the resulting errors.

5

Inside your definition of cortes there is this:

Column[{TraditionalForm[Text[Style[ineq, Blue, Bold, 14]]], 
  Show[{g}, Boxed -> bx, Axes -> ax, ViewPoint -> vp, 
   ImageSize -> 500, AxesStyle -> axst, BoxStyle -> bxst]}, Center, 
 Dividers -> {None, {1 -> None, 2 -> GrayLevel[0.7]}}]

Inside it can you see ineq? Replace ineq with

Row[{ineq, ", volume = ", 
  RegionMeasure[
   ImplicitRegion[
    eqn[x, y, 
     z], {{x, xmin, xmax}, {y, ymin, ymax}, {z, zmin, zmax}}]]}]

It works on my system: the volume is shown in the Manipulate window.

6

Thank you sooo much i did it, and it worked as expected. It seems i was working with the wrong .nb. a similar one to the one i sent here.