O'Halloran numbers: Difference between revisions

m
m (→‎{{header|Raku}}: twiddles)
Line 72:
last if $x * $y > $threshold;
for 1..$y -> $z {
push @Area[my $area = ($x × $y + $y × $z + $z × $x) × 2], "$x,$y,$z";
last if $x * $y * $zarea > $threshold;
}
}
10,333

edits