立体

[Graphics:HTMLFiles/index_4.gif]

kyokusen1 = ParametricPlot3D[{2 s, 2 t, s^2 + t^2}, {s, -2, 2}, {t, -2, 2}]

kyokusen2 = ParametricPlot3D[{2^(1/2) s + 2^(1/2) t, -2^(1/2) s + 2^(1/2) t, s^2 + t^2}, {s, -2, 2}, {t, -2, 2}]

kyokusen3 = ParametricPlot3D[{2 s, 2 t, -s^2 - t^2} + {0, 0, 15}, {s, -2, 2}, {t, -2, 2}]

kyokusen4 = ParametricPlot3D[{2^(1/2) s + 2^(1/2) t, -2^(1/2) s + 2^(1/2) t, -s^2 - t^2} + {0, 0, 15}, {s, -2, 2}, {t, -2, 2}]

Show[kyokusen1, kyokusen2, kyokusen3, kyokusen4, ViewPoint -> {5, 4, 4}]


コメント


これはメロン、スイカ・・・どっち?


3年A組礒野智至


Created by Mathematica  (November 5, 2010) Valid XHTML 1.1!