Для рисования поверхностей вращения удобнее
Пример 5
Поверхности вращения — пакет Graphics`SurfaceOfRevolution`
Для рисования поверхностей вращения удобнее применять пакет Graphics`SurfaceOf Revolution`, который загружается как обычно: <<Graphics`Surf асеOf Revolution`. Вызов SurfaceOfRevolution [t, {x, xmin, xmax}] строит поверхность, которая получается в результате вращения кривой z = f(x) вокруг оси аппликат. Вот пример.
