Task 2 done

1 files changed, 9 insertions, 0 deletions

diff --git a/challenge-140/luca-ferrari/raku/ch-2.p6 b/challenge-140/luca-ferrari/raku/ch-2.p6
new file mode 100755
index 0000000000..3e4ce47e1a
--- /dev/null
+++ b/challenge-140/luca-ferrari/raku/ch-2.p6
@@ -0,0 +1,9 @@
+#!raku
+
+sub MAIN( Int $i where { $i > 0 },
+          Int $j where { $j > 0 },
+          Int $k where { $k > 0 && $k < $i * $j } ) {
+
+    my @table = ( 1 .. $i ) X[*] ( 1 .. $j );
+    @table.sort[ $k ].say;
+}