A={2,3,1};
B={4,-2,5};
c={6,1,-1};

Triángulo escaleno

Norm[B-A]
Norm[c-B]
Norm[c-A]

Ángulo en B

ArcCos[(Dot[A-B,c-B])/(Norm[A-B]*Norm[c-B])]*180/Pi//N

Área

Norm[Cross[B-A,c-A]]/2