спасибо, посмотрю

красота. Но просто интересует как нарисовать конкретную область ограниченную конкретными поверхностями, чтобы ничего лишнего. Что-то пока не получалось.

ну вот здесь пересечение двух цилиндров. Если оставить одну область, то там не поймешь что получиться
with(plots):
implicitplot3d( {x^2 + y^2 =4,y^2+z^2=2},x=-2..2,y=-2..2, z=-2..2);
здесь сечение эллипсойда плоскостью
with(plots):
implicitplot3d( {x^2/4 + y^2/9 +z^2/9=1,y+z=2},x=-2..2,y=-5..5, z=-3..3);
дальше мышью хватаешь за рисунок и поворачиваешь систему координат на нужный угол обзора