Task 1 done.

1 files changed, 24 insertions, 0 deletions

diff --git a/challenge-122/luca-ferrari/raku/ch-1.p6 b/challenge-122/luca-ferrari/raku/ch-1.p6
new file mode 100644
index 0000000000..4a9675dfba
--- /dev/null
+++ b/challenge-122/luca-ferrari/raku/ch-1.p6
@@ -0,0 +1,24 @@
+#!raku
+
+multi sub MAIN( *@N where { @N.elems == @N.grep( * ~~ Int ).elems }) {
+    my @average;
+    @average.push: (@N[ 0 .. @average.elems - 1 ].sum + $_) / ( @average.elems + 1 ) for @N;
+    
+
+    @average.say;
+}
+
+
+multi sub MAIN() {
+    "Insert a number at time".say;
+
+    my @average;
+    my $sum = 0;
+    for lines() {
+        "Not a number".say && next if $_ !~~ / \d+ /;
+        $sum += $_;
+        @average.push: $sum / ( @average.elems + 1 );
+        "Average trend so far: { @average.say }";
+        
+    }
+}