890704

八月一日作業
要看VRML檔請先下載觀看程式：按此下載
1.Construct the sphere with the command "plot3d".
2.Construct the sphere with this pattern:
3.Construct the sphere with this pattern:
4.Construct the sphere with this pattern:
5.Construct the part of the cylinder (x - 0.5)^2 + y^2 = 0.25 lying inside the sphere x2 + y2 + z2 =1.
6.Construct the intersection of the cylinder (x - 0.5)^2 + y^2 = 0.25 and the sphere x^2 + y^2 + z^2 =1.
7.Construct the sphere with the command "sphere" in "plottools".
8.C onstruct eight spheres of the same size each touching three others.
9.Construct four mutually tangent spheres of the same size:
10.Construct six spheres of the same size each touching four others.
11.Construct twelve spheres of the same size each touching five others.
12.Construct twenty spheres of the same size each touching three others.
13.Construct twelve spheres of the same size each touching four others.

Maple作業

7/04

7/06

7/11

7/13

7/18

7/20

7/25

7/27

8/01

8/03

8/08

8/10

> restart:

> with (plottools):

> a:=sphere([0,0,0],1,grid=[50,50]):

> with (plots):

Warning, the name changecoords has been redefined

> display (a,scaling=constrained);

[Maple Plot]