Mathematica基础——SASTriangle
1、SASTriangle[a, r, b]给出一个两边为a、b,且这两边夹角为 r 弧度的三角形。

3、 求三角形的重心,充分的体现了Mathematica的符号计算能力:RegionCentroid[SASTriangle[a,r, b]]

4、 操作一组等腰三角形,边长不变,顶角变化:等腰三角形[s_, \[钽吟篑瑜Alpha]_] := SASTriangle[s, \[Alph锾攒揉敫a], s]Manipulate[Graphics[等腰三角形[6,夹角]],{夹角,0.1,Pi,0.1}]
