aboutsummaryrefslogtreecommitdiff
path: root/challenge-261/barroff/bqn
diff options
context:
space:
mode:
authorBarrOff <58253563+BarrOff@users.noreply.github.com>2024-03-24 22:08:53 +0100
committerBarrOff <58253563+BarrOff@users.noreply.github.com>2024-03-24 22:08:53 +0100
commitbb2e335ab3e6c5dae747ee7308dbccbfbcf34854 (patch)
tree17b1be3310e91912f34532b160922691111faa56 /challenge-261/barroff/bqn
parent6aebc1d768937792779cdac5ff66a026b7eb52a9 (diff)
downloadperlweeklychallenge-club-bb2e335ab3e6c5dae747ee7308dbccbfbcf34854.tar.gz
perlweeklychallenge-club-bb2e335ab3e6c5dae747ee7308dbccbfbcf34854.tar.bz2
perlweeklychallenge-club-bb2e335ab3e6c5dae747ee7308dbccbfbcf34854.zip
feat: add solutions for challenge 261 from BarrOff
Diffstat (limited to 'challenge-261/barroff/bqn')
-rw-r--r--challenge-261/barroff/bqn/ch-1.bqn9
-rw-r--r--challenge-261/barroff/bqn/ch-2.bqn7
2 files changed, 16 insertions, 0 deletions
diff --git a/challenge-261/barroff/bqn/ch-1.bqn b/challenge-261/barroff/bqn/ch-1.bqn
new file mode 100644
index 0000000000..3bc302be2a
--- /dev/null
+++ b/challenge-261/barroff/bqn/ch-1.bqn
@@ -0,0 +1,9 @@
+#/usr/bin/env bqn
+
+DigitSum ← { (10|𝕩) + (0⊸<)◶ 0‿𝕊 𝕩(⌊∘÷)10 }
+ElementDigitSum ← +´-(+´ DigitSum¨)
+
+•Show ElementDigitSum 1‿2‿3‿45
+•Show ElementDigitSum 1‿12‿3
+•Show ElementDigitSum 1‿2‿3‿4
+•Show ElementDigitSum 236‿416‿336‿350
diff --git a/challenge-261/barroff/bqn/ch-2.bqn b/challenge-261/barroff/bqn/ch-2.bqn
new file mode 100644
index 0000000000..bc5825c0b7
--- /dev/null
+++ b/challenge-261/barroff/bqn/ch-2.bqn
@@ -0,0 +1,7 @@
+#/usr/bin/env bqn
+
+MultiplyByTwo ← { (∨´𝕨⊸=)◶𝕨‿((2×𝕨)𝕊⊢) 𝕩 }
+
+•Show 3 MultiplyByTwo 5‿3‿6‿1‿12
+•Show 1 MultiplyByTwo 1‿2‿4‿3
+•Show 2 MultiplyByTwo 5‿6‿7