Sierpinski pentagon: Difference between revisions

Content added Content deleted
m (→‎{{header|Raku}}: Fix bad image link)
Line 1,706: Line 1,706:
(formerly Perl 6)
(formerly Perl 6)
{{works with|rakudo|2018-10}}
{{works with|rakudo|2018-10}}
[[File:Perl6 pentaflake.svg|300x300px|thumb|right|5th order pentaflake]]
<syntaxhighlight lang="raku" line>constant $sides = 5;
<syntaxhighlight lang="raku" line>constant $sides = 5;
constant order = 5;
constant order = 5;
Line 1,727: Line 1,728:
$fh.say: '</svg>';
$fh.say: '</svg>';
$fh.close;</syntaxhighlight>
$fh.close;</syntaxhighlight>

See [http://rosettacode.org/mw/images/5/57/Perl6_pentaflake.svg 5th order pentaflake]


=={{header|Ruby}}==
=={{header|Ruby}}==