我們現在要來建構三點的質心,在文字欄中輸入以下的線 (在每一行的最後按下輸入鍵).。
A = (-2, 1) B = (5, 0) C = (0, 5) Ma = Midpoint[B, C] Mb = Midpoint[A, C] sa = Line[A, Ma] sb = Line[B, Mb] S = Intersect[sa, sb]
另外,我們直接算出質心為
S1 = (A + B + C) / 3
且與用此指令的結果來比較
Relation[S, S1]
接著我們再測試當 S = S1 時,A、 B、 C 在其他位置 。 我們用滑鼠點選移動模式 (工具列最左方的按鍵) 並拖拉其中一點。