From bc17194813748533185aaab3ae234fe0d1984ccb Mon Sep 17 00:00:00 2001 From: "Markus \"Holli\" Holzer" Date: Mon, 28 Sep 2020 18:43:55 +0200 Subject: initial --- challenge-080/markus-holzer/raku/ch-1.raku | 6 ++++++ challenge-080/markus-holzer/raku/ch-2.raku | 7 +++++++ 2 files changed, 13 insertions(+) create mode 100644 challenge-080/markus-holzer/raku/ch-1.raku create mode 100644 challenge-080/markus-holzer/raku/ch-2.raku diff --git a/challenge-080/markus-holzer/raku/ch-1.raku b/challenge-080/markus-holzer/raku/ch-1.raku new file mode 100644 index 0000000000..40e68758e8 --- /dev/null +++ b/challenge-080/markus-holzer/raku/ch-1.raku @@ -0,0 +1,6 @@ +unit sub MAIN( *@N where .all ~~ Int ); + +given (1..@N.max) ∖ (@N>>.Int) { + say .elems + ?? "Smallest missing element is {.min.key}" + !! "No missing elements" } \ No newline at end of file diff --git a/challenge-080/markus-holzer/raku/ch-2.raku b/challenge-080/markus-holzer/raku/ch-2.raku new file mode 100644 index 0000000000..974cd8b5c6 --- /dev/null +++ b/challenge-080/markus-holzer/raku/ch-2.raku @@ -0,0 +1,7 @@ +unit sub MAIN( *@N where .all ~~ Int ); + +# Hint: In numeric context, True is 1 and False is 0 +say ( Inf, |@N, Inf ) + .rotor( 3 => -2 ) + .map({ slip .[1] > .[0], .[1] > .[2] }) + .sum + @N \ No newline at end of file -- cgit