aboutsummaryrefslogtreecommitdiff
path: root/challenge-061/aecepoglu/bqn
diff options
context:
space:
mode:
authorMohammad S Anwar <mohammad.anwar@yahoo.com>2022-10-02 21:39:22 +0100
committerMohammad S Anwar <mohammad.anwar@yahoo.com>2022-10-02 21:39:22 +0100
commitf278fb6fd6ad47c517d7ea7238d5f0376ddeb90d (patch)
treec7a9db5b8928be787463b3f78787c113bd903c3c /challenge-061/aecepoglu/bqn
parenteca4423a53891951064f41611d7db28bb9211c20 (diff)
downloadperlweeklychallenge-club-f278fb6fd6ad47c517d7ea7238d5f0376ddeb90d.tar.gz
perlweeklychallenge-club-f278fb6fd6ad47c517d7ea7238d5f0376ddeb90d.tar.bz2
perlweeklychallenge-club-f278fb6fd6ad47c517d7ea7238d5f0376ddeb90d.zip
- Added guest contributions to past weeks by AhmetEmre.
Diffstat (limited to 'challenge-061/aecepoglu/bqn')
-rw-r--r--challenge-061/aecepoglu/bqn/ch-1.bqn1
-rw-r--r--challenge-061/aecepoglu/bqn/ch-2.bqn5
2 files changed, 6 insertions, 0 deletions
diff --git a/challenge-061/aecepoglu/bqn/ch-1.bqn b/challenge-061/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..f5ec0657a0
--- /dev/null
+++ b/challenge-061/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1 @@
+(⌈´⊸=×´¨)⊸/1((⊢-˜¬×+`)∘>⊔⊢) 2‿5‿¯1‿3
diff --git a/challenge-061/aecepoglu/bqn/ch-2.bqn b/challenge-061/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..1c165ff342
--- /dev/null
+++ b/challenge-061/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,5 @@
+s←"25525511135"
+
+≢i←(+`(↕≠s)⊸∊)˘ >3 (Comb) ≠s
+Int←(⊣+10×⊢)´∘⌽'0'-˜⊢
+(<{𝕨∾'.'∾𝕩}´)˘•Repr¨(∧´˘255≥⊢)⊸/Int¨(∧´3≥≠¨)˘⊸/⊔⟜s˘i