diff options
| -rw-r--r-- | challenge-020/adam-russell/perl6/ch-2.rk | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/challenge-020/adam-russell/perl6/ch-2.rk b/challenge-020/adam-russell/perl6/ch-2.rk index 46e4329e8f..8a574752bf 100644 --- a/challenge-020/adam-russell/perl6/ch-2.rk +++ b/challenge-020/adam-russell/perl6/ch-2.rk @@ -1,3 +1,6 @@ +## +# Write a script to print the smallest pair of Amicable Numbers. +## constant RANGE_SIZE = 50; sub factor-sum(@numbers){ my %number_sof; |