Section 15.8 Example: Mt. Fuji
MAT329, Fall, 2015
Andy Long

Clear[height,rad]
Int=Integrate[200 z r,{z,0,height},{t,0,2Pi},{r,0,rad(1-z/height)}]
height=12400
rad=62000
Int
N[%]