怎么用Mathematica绘制圆的弓形

1、绘制圆盘：Graphics[{Pink, Disk[{0, 0}, 1]]

3、绘制1/3个圆盘：Disk[{0, 0}, 1, {0, 2 Pi/3}]这是一个扇形。

5、把扇形和弓形画到一起：

7、弓形到圆的变化过程：

9、椭圆里面的弓形：DiskSegment[{0, 0}, {3, 2}, {0, Pi/2}]