diff options
| -rw-r--r-- | challenge-173/massa/raku/ch-1.raku | 4 | ||||
| -rw-r--r-- | challenge-173/massa/raku/ch-2.raku | 3 |
2 files changed, 7 insertions, 0 deletions
diff --git a/challenge-173/massa/raku/ch-1.raku b/challenge-173/massa/raku/ch-1.raku new file mode 100644 index 0000000000..f1a68ab26d --- /dev/null +++ b/challenge-173/massa/raku/ch-1.raku @@ -0,0 +1,4 @@ +use v6; +unit sub MAIN(Int $n); +my sub esthetic-number(Int $n --> Bool) { $n.comb.rotor(2 => -1).map({1 == abs [-] $_}).all.Bool } +say esthetic-number $n diff --git a/challenge-173/massa/raku/ch-2.raku b/challenge-173/massa/raku/ch-2.raku new file mode 100644 index 0000000000..b36eea2eb3 --- /dev/null +++ b/challenge-173/massa/raku/ch-2.raku @@ -0,0 +1,3 @@ +use v6.d; +unit sub MAIN(Int $n = 10); +say (2, 3, * × * + 1 ... *).head: $n |