parametrizacija

xuv[u_, v_] := 2 * Sin[v] * Cos[u] ; yuv[u_, v_] := 2 * Sin[v] * Sin[u] ; zuv[u_, v_] := Cos[v ... wBox[{RowBox[{v0, =, 0.01}], ;}] RowBox[{RowBox[{v1, =, RowBox[{Pi, -, 0.01}]}], ;}] dv = Pi/42 ;

Created by Mathematica  (May 4, 2004)