Revision as of 09:07, 31 July 2021 (view source) GordonCharlton (talk \| contribs) (→‎{{header\|Quackery}}: added image) ← Older edit		Revision as of 17:05, 13 August 2021 (view source) Shuisman (talk \| contribs) m (→‎{{header\|Mathematica}}) Newer edit →
Line 707: </pre> =={{header\|Mathematica}}/{{header\|Wolfram Language}}== <lang mathematica>Graphics[{ ~~Graphics[{~~ 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> ~~</lang>~~ =={{header\|Nim}}==

Pentagram (view source)