/Volumes/Daten/Geogebra/Sichtweite

R

R

h=1,7m

h=10m

h=60m

h=100m

h=200m

Standard

M = Point({0, 0})
R = 7 (slider from 0 to 6371, step 1)
F = Point({R, 0})
k = Circle(M, R)
Erdradius = Segment(M, F)
h_{1} = 2 (slider from 0 to 10, step 0.001)
A = Point({R + h_{1}, 0})
h = Segment(F, A)
Polare_B = Polar(A, k)
C, D = Intersect(k, Polare_B)
f = Segment(M, C)
t = Ray(A, C)
s = Segment(A, C)
b = Arc(k, F, C)
sr: (s * 1.1)
Text1: "Erdradius R=" + R + " km"
Text2: "Objekthöhe h=" + h_{1} + " km"
Text3: "Bogenlänge b= " + b + " km"
Text4: "Sichtweite s= " + s + " km"
Text5: "Realistische Sichtweite s_R= s∙1.1= " + sr + " km"
β: asin(s / (R + h_{1}))
α = Angle(F, M, C)