利用柱面坐标系画出锥面和球面上半部分构成的图形(mathematica)