diff options
Diffstat (limited to 'challenge-159')
126 files changed, 6158 insertions, 142 deletions
diff --git a/challenge-159/0rir/raku/ch-1.raku b/challenge-159/0rir/raku/ch-1.raku new file mode 100644 index 0000000000..3867df64f7 --- /dev/null +++ b/challenge-159/0rir/raku/ch-1.raku @@ -0,0 +1,22 @@ +#!/usr/bin/env raku +# :vim ft=raku sw=4 expandtabs +use v6.d; + +my $n = 7; + +say "Input: \$n = $n"; + +my @farey + = sort { $^a <=> $^b }, gather + { for 1 .. $n -> $de { + for 0 .. $de -> $nu { + take $nu/$de; + } + } + }.unique; + +for @farey -> $f is rw { + $f = $f.numerator ~ '/' ~ $f.denominator; +} + +say "Output = @farey.join(', ')."; diff --git a/challenge-159/0rir/raku/ch-2.raku b/challenge-159/0rir/raku/ch-2.raku new file mode 100644 index 0000000000..74750da588 --- /dev/null +++ b/challenge-159/0rir/raku/ch-2.raku @@ -0,0 +1,52 @@ +#!/usr/bin/e |
