Grafika v 3D

Graphics3D[{PointSize[0.05],Point[{0,0,0}]},ImageSize->{200,200}]

Graphics3D[{Thickness[0.05],Line[{{1,1,1},{2,2,2}}]},ImageSize->{200,200}]

Graphics3D[Cuboid[{0,0,0}],ImageSize->{200,200}]

Graphics3D[Cuboid[{0,0,0},{3,3,3}],ImageSize->{200,200}]

Graphics3D[Cylinder[{{0,0,0},{2,1,2}},1],ImageSize->{200,200}]

Graphics3D[Sphere[{0,0,0}],ImageSize->{200,200}]

Graphics3D[Sphere[{0,0,0},3]]

kocka1=Graphics3D[Cuboid[{0,0,0},{3,3,3}]];
kocka2=Graphics3D[Cuboid[{3,0,0},{4,1,1}]];
kocka3=Graphics3D[Cuboid[{0,7,0},{1,8,1}]];
kocka4=Graphics3D[Cuboid[{0,0,3},{1,1,4}]];
Show[kocka1,kocka2,kocka3,kocka4,ImageSize->{200,200}]

Graphics3D[Rotate[Cuboid[],30Degree,{0,0,1}],ImageSize->{200,200}]

(* Every time you evaluate rcoord,it generates a random coordinate in three dimensions. *)
nahod:=RandomReal[1.,{3}]
body=Table[Point[nahod],{20}]
Graphics3D[body,ImageSize->{200,200}]

Graphics3D[Line[Table[nahod,{10}]],ImageSize->{200,200}]

rantri:=Polygon[Table[nahod,{3}]]
Graphics3D[rantri,ImageSize->{200,200}]

Graphics3D[Table[{Cuboid[15  nahod],Sphere[15  nahod]},{5}],ImageSize->{200,200}]