Magic squares/Raku: Difference between revisions
Content added Content deleted
Thundergnat (talk | contribs) (Fix up some internal links) |
Thundergnat (talk | contribs) m (syntax highlighting) |
||
| Line 11: | Line 11: | ||
</ul> |
</ul> |
||
<lang |
<syntaxhighlight lang="raku" line>sub MAIN (Int $n where {$n > 0}) { |
||
my @sq; |
my @sq; |
||
| Line 70: | Line 70: | ||
(@sq[$q;$q], @sq[$q+$h;$q]) = (@sq[$q+$h;$q], @sq[$q;$q]); |
(@sq[$q;$q], @sq[$q+$h;$q]) = (@sq[$q+$h;$q], @sq[$q;$q]); |
||
} |
} |
||
}</ |
}</syntaxhighlight> |
||