Για ακρίβεια ο δρομέας c κινήταιμε τα βελάκια δεξιά αριστερά
Σβύσε αυτό το πλαίσιο

Μετακινείστε τους δρομείς χ και ψ για να μεταβάλλεται τις διαστάσεις του ορθογωνίου AGΓΖ
Μετακινείστε τους δρομείς n, c για να μεταβάλλεται το πλήθος (κάθετα τμήματα) και το πλάτος των μικρών ορθογωνίων

Για  n=0, μεταβάλλεται τις διαστάσεις του ορθογωνίου και καταγράψτε ένα ζεύγος τιμών
 που δίνει εμβαδό 80. 
Πόσα τέτοια ζεύγη υπάρχουν;
Με τη βοήθεια του λογιστικού φύλλου, φτιάξτε έναν πίνακα με μερικές τέτοιες τιμές.
Ποια σχέση ισχύει για τα δυο μεγέθη;
Μεταφέρεται τα δεδομένα σε ένα σύστημα συντεταγμένων. 
Τι γραμμή σχηματίζεται;

Δραστηριότητα 1

Δραστηριότητα 2
Δημιουργήστε ένα ορθογωνιο διαστάσεων μήκους 20 και πλάτος 6.
Μεταβάλλοντας τους δρομείς n,c προσπαθήστε να βρείτε ένα ζεύγος τιμων που να χωρίζει το αρχικό ορθογώνιο σε ίσα μέρη.
Πόσα τέτοια ζεύγη υπάρχουν;
Φτιάξτε έναν  τέτοιο πίνακα με αρκετά τέτοια ζεύγη  και να κάνετε τη γραφική παράσταση .

Δραστηριότητα 2

Δημιουργείστε ορθογώνιο διαστάσεων 10Χ1.
Να το χωρίσετε σε τρια ίσα μέρη και να υπολογίσετε
με όση ακρίβεια μπορείτε το μήκος αυτών

Διευκρινήσεις

Δημιουργείστε ένα σταθερό ορθογώνιο μήκους 20 και πλάτους 6.
Βρείτε τιμές για το 'εμβαδό των μικρών ορθογωνίων' και γαι το 'πληθος' τους 
με στόχο πάλι το αρχικό ορθογώνιο να χωρίζεται σε ίσα μέρη.
Ποια σχέση ισχύει για τα συγκεκριμμένα μεγέθη;
Κατασκευάστε, με τη χρήση του λογιστικού φύλλου, την αντίστοιχη γραφική παράσταση.

Δραστηριότητα 3

ψ = 8 (slider from 0 to 22, step 0.1)
Α = (1.850351471313111, 0.001709621150046569)
Β = (34.60323292090921, 3.77484294451171)
a = Segment(Α, Β)
n = 3 (slider from 0 to 30, step 1)
G: (x(Α), ψ)
c = 3 (slider from 0 to 24, step 1)
L1 = Sequence((x(Α) + (c * i), 0), i, 1, n)
d = Segment(Α, G)
Δ = (25.599258823877545, 6.192576729825764)
e = Segment(Β, Δ)
f = Segment(Δ, G)
απόστασηGΔ = Distance(G, Δ)
g = OrthogonalLine(G, d)
χ = 15 (slider from 0 to 30, step 1)
h = Circle(G, χ)
Γ, Ε = Intersect(h, g)
i = OrthogonalLine(Γ, g)
Ζ = Intersect(i, b)
j = Segment(Γ, Ζ)
απόστασηGΓ = Distance(G, Γ)
ΚείμενοGΓ: "\overline{" + (Name[G]) + (Name[Γ]) + "} \, = \, " + απόστασηGΓ
k = Segment(G, Γ)
m = OrthogonalLine(Ζ, j)
p = OrthogonalLine(G, m)
Η = Intersect(m, p)
l = Segment(Α, G)
q = Segment(Α, Ζ)
L2 = Sequence((x(G) + (c * i), ψ), i, 1, n)
tmimata = Sequence(Segment[(x(Α) + (c * k), 0), (x(Α) + (c * k), ψ)], k, 1, n)
o = false
r = false
Επεκτάσεις = false
s = false
πολύγ1, α, g_1, γ, ζ = Polygon(Α, G, Γ, Ζ)
Σημείοπολύγ1 = PointIn(πολύγ1)
Κείμενοπολύγ1: "Ε = " + πολύγ1 + ""
t = false