Vamos agora construir o baricentro de três pontos incorporando as seguintes linhas ao campo de entrada (teclando Enter ao finalizar cada linha). Naturalmente, você também pode usar o mouse para realizar esta construção usando os correspondentes modos (ver 3.2 ) na barra de ferramentas.
A = (-2, 1)
B = (5, 0)
C = (0, 5)
M_a = PontoMédio[B, C]
M_b = PontoMédioA, C]
s_a = Reta[A, M_a]
s_b = Reta[B, M_b]
S = Interseção[s_a, s_b]
Alternativamente nós escrevemos o baricentro como
S1 = (A + B + C) / 3
e comparamos os resultados usando o comando
Relação[S, S1]
Subseqüentemente, nós testamos se S = S1 é verdadeira para outras
posições de A, B, C. Nós fazemos essa mudança escolhendo o modo
Mover
com o mouse (botão mais à esquerda da barra de ferramentas) e arrastando
um dos pontos.