【Mathematica】12版本新功能之几何作图

 时间:2026-02-13 03:45:26

1、绘制一个经过ABC三点的圆。这是一个随机的几何图形:

RandomInstance[

 GeometricScene[{a, b, c}, {Point[{a, b, c}], 

   CircleThrough[{a, b, c}]}]]

字母用小写字母表示。

【Mathematica】12版本新功能之几何作图

2、加上线段BC的中点:

RandomInstance[

 GeometricScene[{a, b, c, d}, {Point[{a, b, c, d}], 

   d == Midpoint[{b, c}], CircleThrough[{a, b, c}]}]]

【Mathematica】12版本新功能之几何作图

3、绘制三角形ABC:

RandomInstance[

 GeometricScene[{a, b, c, d}, {Point[{a, b, c, d}], 

   Triangle[{a, b, c}], d == Midpoint[{b, c}], 

   CircleThrough[{a, b, c}]}]]

【Mathematica】12版本新功能之几何作图

4、限定∠ABC的度数是36°:

RandomInstance[

 GeometricScene[{a, b, c, d}, {Point[{a, b, c, d}], 

   Triangle[{a, b, c}], d == Midpoint[{b, c}], 

   CircleThrough[{a, b, c}], PlanarAngle[{a, b, c}] == 36 Degree}]]

【Mathematica】12版本新功能之几何作图

5、再强加一个限制条件:

RandomInstance[

 GeometricScene[{a, b, c, d}, {Point[{a, b, c, d}], 

   Triangle[{a, b, c}], d == Midpoint[{b, c}], 

   CircleThrough[{a, b, c}], PlanarAngle[{a, b, c}] == 36 Degree, 

   PlanarAngle[{a, d, c}] == 99 Degree}]]

此时的三角形ABC的形状已经确定了。

【Mathematica】12版本新功能之几何作图

6、还可以加什么条件呢?

形状不能变,大小却可以变化:

RandomInstance[

 GeometricScene[{a, b, c, d}, {Point[{a, b, c, d}], 

   Triangle[{a, b, c}], d == Midpoint[{b, c}], 

   CircleThrough[{a, b, c}], PlanarAngle[{a, b, c}] == 36 Degree, 

   PlanarAngle[{a, d, c}] == 99 Degree, 

   EuclideanDistance[a, b] == 1}]]

【Mathematica】12版本新功能之几何作图

  • Mathematica在求参数范围时的应用
  • 【Mathematica】怎么计算布洛卡点坐标?
  • Mathematica应用——有趣的绝对值方程
  • Mathematica基础——三重积分
  • 用Mathematica处理几何问题——点、线段
  • 热门搜索
    籍贯是什么意思 ap是什么意思 惠存是什么意思 怎么用q币发红包 大于号小于号怎么打 手上毛孔粗大怎么办 心脏不好如何调理 释怀是什么意思 如何设置屏保 太空生活