Anonymous user
Pentagram: Difference between revisions
→{{header|Mathematica}}
Line 152:
EdgeForm[Directive[Thickness[0.01], RGBColor[0, 0, 1]]],(*Edge coloring*)
RGBColor[0.5, 0.5, .50], (*Fill coloring*)
Polygon[AnglePath[Table[6 Pi/5, 5]]]}
]
</lang>
| |||