Pravougaonik
Date: 10.oktobar 2011.

Napraviti aplikaciju u Geogebri koja omogućava definisanje visine i širine pravougaonika kao na slici ispod. Potrebno je da postoje svi prikazani elementi.

\mbox{Svaki kvadratić = } 1 cm^2

A = (-5.433333333333334, 0.5)
širina = 10 (slider from 1 to 10, step 1)
c = Circle(A, širina)
B = (9.133333333333333, 0.5)
a = Ray(A, B)
visina = 8 (slider from 1 to 8, step 1)
d = Circle(A, visina)
b = OrthogonalLine(A, a)
C = Intersect(d, b, 1.0)
e = OrthogonalLine(C, b)
D = Intersect(c, a, 1.0)
f = OrthogonalLine(D, a)
E = Intersect(f, e)
P, a_1, c_1, e_1, d_1 = Polygon(A, C, E, D)
g = 1
h = Circle(A, g)
F = Intersect(h, a_1)
G = Intersect(h, d_1)
H = Mirror(A, G)
I = Mirror(G, H)
J = Mirror(H, I)
K = Mirror(I, J)
L = Mirror(J, K)
M = Mirror(K, L)
N = Mirror(L, M)
O = Mirror(M, N)
Q = Mirror(N, O)
R = Mirror(O, Q)
S = Mirror(Q, R)
T = Mirror(R, S)
U = Mirror(S, T)
V = Mirror(A, F)
W = Mirror(F, V)
Y = Mirror(V, W)
Z = Mirror(W, Y)
A_1 = Mirror(Y, Z)
B_1 = Mirror(Z, A_1)
C_1 = Mirror(A_1, B_1)
D_1 = Mirror(B_1, C_1)
i = OrthogonalLine(G, d_1)
j = OrthogonalLine(H, d_1)
k = OrthogonalLine(I, d_1)
l = OrthogonalLine(J, d_1)
m = OrthogonalLine(K, d_1)
n = OrthogonalLine(L, d_1)
p = OrthogonalLine(M, d_1)
q = OrthogonalLine(N, d_1)
r = OrthogonalLine(O, d_1)
s = OrthogonalLine(Q, d_1)
t = OrthogonalLine(R, d_1)
b_1 = OrthogonalLine(S, d_1)
f_1 = OrthogonalLine(T, d_1)
g_1 = OrthogonalLine(U, d_1)
h_1 = OrthogonalLine(F, a_1)
i_1 = OrthogonalLine(V, a_1)
j_1 = OrthogonalLine(W, a_1)
k_1 = OrthogonalLine(Y, a_1)
l_1 = OrthogonalLine(Z, a_1)
m_1 = OrthogonalLine(A_1, a_1)
n_1 = OrthogonalLine(B_1, a_1)
p_1 = OrthogonalLine(C_1, a_1)
q_1 = OrthogonalLine(D_1, a_1)
E_1 = Intersect(c_1, i)
F_1 = Intersect(r, c_1)
r_1 = Segment(F_1, O)
G_1 = Intersect(j, c_1)
H_1 = Intersect(k, c_1)
I_1 = Intersect(l, c_1)
J_1 = Intersect(m, c_1)
K_1 = Intersect(n, c_1)
L_1 = Intersect(p, c_1)
M_1 = Intersect(q, c_1)
N_1 = Intersect(s, c_1)
O_1 = Intersect(t, c_1)
P_1 = Intersect(b_1, c_1)
Q_1 = Intersect(f_1, c_1)
R_1 = Intersect(g_1, c_1)
S_1 = Intersect(e_1, q_1)
T_1 = Intersect(e_1, p_1)
U_1 = Intersect(e_1, n_1)
V_1 = Intersect(m_1, e_1)
W_1 = Intersect(l_1, e_1)
Y_1 = Intersect(k_1, e_1)
Z_1 = Intersect(j_1, e_1)
A_2 = Intersect(i_1, e_1)
B_2 = Intersect(h_1, e_1)
s_1 = Segment(E_1, G)
t_1 = Segment(G_1, H)
a_2 = Segment(H_1, I)
b_2 = Segment(I_1, J)
c_2 = Segment(J_1, K)
d_2 = Segment(K_1, L)
e_2 = Segment(L_1, M)
f_2 = Segment(M_1, N)
g_2 = Segment(N_1, Q)
h_2 = Segment(O_1, R)
i_2 = Segment(P_1, S)
j_2 = Segment(Q_1, T)
k_2 = Segment(R_1, U)
l_2 = Segment(D_1, S_1)
m_2 = Segment(C_1, T_1)
n_2 = Segment(B_1, U_1)
p_2 = Segment(A_1, V_1)
q_2 = Segment(Z, W_1)
r_2 = Segment(Y, Y_1)
s_2 = Segment(W, Z_1)
t_2 = Segment(V, A_2)
a_3 = Segment(F, B_2)
C_2 = (-7.633333333333333, -1.7)
o = 1
c_3 = Circle(C_2, o)
D_2 = Point(c_3)
b_3 = Segment(C_2, D_2)
d_3 = Circle(D_2, C_2)
e_3 = OrthogonalLine(D_2, b_3)
f_3 = OrthogonalLine(C_2, b_3)
E_2 = Intersect(c_3, f_3, 2.0)
F_2 = Intersect(d_3, e_3, 2.0)
P_2, e_4, f_4, d_4, c_4 = Polygon(E_2, F_2, D_2, C_2)
T2: "\mbox{Površina = }" + P + " cm^2"