Быстрое введение в систему Mathematica. Ч.1. Израилевич Я.А - 9 стр.

UptoLike

ВУЗ: 

ВГУ | Воронеж

Составители: 

Рубрика: 

Out[26] =
--Graphics-
In[27]:=
ParametricPlot3D[{(4+Cos[t])Cos[u],(4+Cos[t])Sin[u],Sin[t
]},{t,0,2 Pi}, {u,0,2 Pi}, Ticks->None]
Jbk1519
Out [27 ] =
-Graphics3D-
In[28]:=
ParametricPlot3D[{4+(4+u*Cos[t/2])Cos[t],Sin[t/2]*u,
(4+u*Cos[t/2])Sin[t]}, { t,0,2 Pi}, {u,-1,1},
Ticks->None]
Jbk151:
- Out [28
] = Graphics3D-
b kh\f_klguc ihdZa g_kdhevdbo ]jZnbdh\/ ihkljh_gguo ih hl^_evghklb
In [29 ]: =
Show[%,%%] 
    Out[26] = --Graphics-
    In[27]:=
ParametricPlot3D[{(4+Cos[t])Cos[u],(4+Cos[t])Sin[u],Sin[t
]},{t,0,2 Pi}, {u,0,2 Pi}, Ticks->None]




    �������
    Out [27 ] = -Graphics3D-
    In[28]:=
ParametricPlot3D[{4+(4+u*Cos[t/2])Cos[t],Sin[t/2]*u,
 (4+u*Cos[t/2])Sin[t]}, { t,0,2 Pi}, {u,-1,1},
  Ticks->None]




    �������
    - Out [28 ] = Graphics3D-

    � ���������� ����� ���������� ��������� ����������� �� �����������
    In    [29 ]: =Show[%,%%]

Страницы