\vec{ AB } \;. \;\vec{ AC } \;= \; AB \; \times \; AC \; \times \; cos\, \widehat{BAC}

A = (-2.72, 2.2)
B = (12.8, 0.98)
u = Vector(A, B)
C = (-2.44, 5.6)
v = Vector(A, C)
α = Angle(u, v)
b = Distance(A, C)
TexteAC: Name[A] + (Name[C]) + " \, = \, " + b
a = Distance(A, B)
TexteAB: Name[A] + (Name[B]) + " \, = \, " + a
texte2: "\vec{ AB } \;. \;\vec{ AC } \;= \;" + a + "\; \times \;" + b + "\; \times \; cos \;" + α + "\; = \;" + (a * b * cos(α))
A1 = -2.7
B1 = 2.48
C1 = 1.34
D1 = 2.96
E1 = 0.58
F1 = -3.12
G1 = -2.46
H1 = 1.7