breadth

CONSTRUCTION OF A RECTANGLE

PROPERTIES OF A RECTANGLE
*Opposite sides are equal and parallel.
*Each angle of a Rectangle is a rightangle.
*Diagonals bisect each other.

Author:SHAILAJA.T.K.
Copyright:CC BY SA

length = 10 (slider from 1 to 30, step 1)
breadth = 4 (slider from 1 to 30, step 1)
A = (-0.56, -2.74)
B_1 = (10.38, -0.84)
C_1 = (4.26, 0.44)
D = Point(Circle[A, length])
f = Segment(A, D)
c = Circle(A, breadth)
d = Circle(D, breadth)
g = OrthogonalLine(A, f)
h = OrthogonalLine(D, f)
B = Intersect(c, g, 2)
F, C = Intersect(d, h)
i = Line(B, f)
q1, a, b, c_1, d_1 = Polygon(A, B, C, D)
α = Angle(D, A, B)
β = Angle(A, B, C)
γ = Angle(B, C, D)
δ = Angle(C, D, A)
Pointq1_1 = PointIn(q1)
Textq1: "Area of  " + (Name[A]) + "" + (Name[B]) + "" + (Name[C]) + "" + (Name[D]) + " = " + q1 + ""
distanceBb = Distance(B, b)
TextBb: Name[B] + (Name[b]) + " = " + distanceBb
perimeterq1 = Perimeter(q1)
text2: "Perimeter of  " + (Name[A]) + (Name[B]) + (Name[C]) + (Name[D]) + " = " + perimeterq1
Pointq1 = PointIn(q1)
j = Segment(A, C)
k = Segment(D, B)
E = Intersect(k, j)