\text{ Zostrojte priečku mimobežiek  }AE,BG \ \text{ rovnobežnú so smerom }\overrightarrow{SM}, S\text{ je stred kocky.}

 \text{Postup

A = (-3, -3, 0)
B = (3, -3, 0)
C = Point(Circle[B, Distance[A, B], Segment[A, B]])
K, D, E, F, G, H, stenaABCD, stenaADHE, stenaABFE, stenaBCGF, stenaCDHG, stenaEFGH, hranaAD, hranaAB, hranaBC, hranaCD, hranaAE, hranaDH, hranaEH, hranaEF, hranaBF, hranaFG, hranaCG, hranaGH = Cube(A, B, C)
g = Line(A, E)
f = Line(B, G)
S = Midpoint(D, F)
k = Line(B, A)
M = Point(k)
u = Vector(S, M)
h = OrthogonalLine(S, xOyPlane)
S_0 = Intersect(h, xOyPlane)
i = Segment(S, S_0)
j = Segment(S_0, M)