VRP - šesťuholník

α

dlžka(p)/6

1/2

1. \text{ Zvoľme si body }C, D, L ∈ k

2. \text{ Body }A, B ∈π  \text{ sú samodružné  

3.  \; VRP:C → C_1;D→D_1

4.   \; VRP:L → L_1

1

Obrazom kružnice je elipsa určená 5 bodmi

Zmeňte hodnoty α, q, r

β = 0.7853981633974483 rad (slider from 5° to 175°, step 0.08726646259971647)
I = (0, 14)
q = 3 (slider from 1 to 5, step 0.1)
S_0 = Point(xAxis)
g = Segment(S_0, I)
M = Point(g)
G_1 = (22, 0)
p = Segment(S_0, M)
S' = Rotate(M, (-β), S_0)
n_2 = Ray(S_0, S')
c = Circle(S_0, q)
M_1 = Intersect(c, n_2, 1)
q1 = Segment(S_0, M_1)
u = Vector(M, M_1)
S'_1 = Rotate(M, (-β), S_0)
α = Angle(S'_1, S_0, M)
q12: q1 / p
c1 = Numerator(q12)
text8: "" + c1 + ""
m1 = Denominator(q12)
text7: "" + m1 + ""
text10 = FractionText(q12)
text2: "q = " + (LaTeX[text10]) + ""
text4: "α = " + β + ""
r = 5 (slider from 4 to 6, step 1)
text5: "r = " + r + ""
S = (9, 0)
d = Circle(S, r)
A, B = Intersect(d, xAxis)
text3: "VPR \text{ je dané smerom }α =" + (LaTeX[β]) + "   \text{ a koeficientom }q = "
text1: "\text{ Je daná kružnica }k( S, r = " + (LaTeX[r]) + "  )"
h = OrthogonalLine(S, xAxis)
C = Intersect(d, h, 2)
D = Intersect(d, h, 1)
L = Point(d)
B_1: B
A_1: A
f = Line(C, u)
i = Line(S, q1)
C_1 = Intersect(f, i)
j = Line(D, f)
D_1 = Intersect(i, j)
k = Line(L, f)
l = Line(L, h)
E = Intersect(l, xAxis)
m = Line(E, i)
L_1 = Intersect(k, m)
e = Conic(D_1, B_1, C_1, L_1, A_1)