aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--challenge-049/markus-holzer/raku/ch-1.p66
1 files changed, 5 insertions, 1 deletions
diff --git a/challenge-049/markus-holzer/raku/ch-1.p6 b/challenge-049/markus-holzer/raku/ch-1.p6
index 5793330e98..44a9b0861b 100644
--- a/challenge-049/markus-holzer/raku/ch-1.p6
+++ b/challenge-049/markus-holzer/raku/ch-1.p6
@@ -1,4 +1,8 @@
sub MAIN( $n )
{
+ # I have no formal proof for this, but I have a strong hunch that it's true.
+ say "Impossible" and exit
+ if so ( 2, 4, 8 ... *² > $n ).first( $n %% * );
+
say (1, 10, { $_ %% 2 ?? $_ + 1 !! $_ * 10 } ... *).first( * %% $n );
-} \ No newline at end of file
+}