Taxicab numbers: Difference between revisions
m
→{{header|Perl 6}}: escaped the exponent to display the output correctly
(Added Elixir) |
m (→{{header|Perl 6}}: escaped the exponent to display the output correctly) |
||
Line 1,381:
my $i = $start;
printf "%4d %10d =>\t%s\n", $i++, $_.key,
($_.value.map({ sprintf "%4d³ + %-s", $_[0], "$_[1]\³" })).join: ",\t"
for %this_stuff.grep( { $_.value.elems > 1 } ).sort( +*.key )[$start-1..$end-1];
1;
|