a = 1 (slider from -5 to 5)
b = 1 (slider from -5 to 5)
Omega: (a, b)
R = 4.8 (slider from -5 to 5)
c = Circle(Omega, R)
A = Point(c)
f = Segment(Omega, A)
distanceOmegaA = Distance(Omega, A)
Midpoint(Omega, A)
TexteOmegaA: Name[Omega] + (Name[A]) + " = " + distanceOmegaA