diff options
| author | Mohammad S Anwar <Mohammad.Anwar@yahoo.com> | 2022-07-13 17:35:18 +0100 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2022-07-13 17:35:18 +0100 |
| commit | 89b3f8ce33bc5c7152d022c6c1d2a401877361eb (patch) | |
| tree | bdb587745af9f51f9477ff62074ab04d2640df0d /challenge-173 | |
| parent | 974f085899b5756a9c0374322666ee27b6ff00f1 (diff) | |
| parent | cfeb8d055323aa743b34d3819bbe6fb244640178 (diff) | |
| download | perlweeklychallenge-club-89b3f8ce33bc5c7152d022c6c1d2a401877361eb.tar.gz perlweeklychallenge-club-89b3f8ce33bc5c7152d022c6c1d2a401877361eb.tar.bz2 perlweeklychallenge-club-89b3f8ce33bc5c7152d022c6c1d2a401877361eb.zip | |
Merge pull request #6438 from codereport/master
Week 173 in APL & BQN
Diffstat (limited to 'challenge-173')
| -rw-r--r-- | challenge-173/conor-hoekstra/ch-1.apl | 4 | ||||
| -rw-r--r-- | challenge-173/conor-hoekstra/ch-2.apl | 17 | ||||
| -rw-r--r-- | challenge-173/conor-hoekstra/ch-2.bqn | 3 |
3 files changed, 24 insertions, 0 deletions
diff --git a/challenge-173/conor-hoekstra/ch-1.apl b/challenge-173/conor-hoekstra/ch-1.apl new file mode 100644 index 0000000000..6119b85d5f --- /dev/null +++ b/challenge-173/conor-hoekstra/ch-1.apl @@ -0,0 +1,4 @@ +estheticNumber ← {1=∧/|2-/⍎¨⍕⍵} + +⍝ Tests +estheticNumber ¨ 5456 120 diff --git a/challenge-173/conor-hoekstra/ch-2.apl b/challenge-173/conor-hoekstra/ch-2.apl new file mode 100644 index 0000000000..169faeff24 --- /dev/null +++ b/challenge-173/conor-hoekstra/ch-2.apl @@ -0,0 +1,17 @@ +⍝ Sylvester's Sequence + (⊢,1+×/)⍣9⊢2 +2 3 7 43 1807 3263443 1.065005695E13 1.134237131E26 1.286493868E52 1.655066473E104 + +⍝ Formatted + ⍪⍕¨(⊢,1+×/)⍣9⊢2 + 2 + 3 + 7 + 43 + 1807 + 3263443 + 1.065005695E13 + 1.134237131E26 + 1.286493868E52 + 1.655066473E104 +
\ No newline at end of file diff --git a/challenge-173/conor-hoekstra/ch-2.bqn b/challenge-173/conor-hoekstra/ch-2.bqn new file mode 100644 index 0000000000..4bc3625bd4 --- /dev/null +++ b/challenge-173/conor-hoekstra/ch-2.bqn @@ -0,0 +1,3 @@ +# Sylvester's Sequence + ∾⟜(1+×´)⍟9 ⥊2 +⟨ 2 3 7 43 1807 3263443 10650056950807 1.1342371305542186e26 1.2864938683278675e52 1.6550664732452e1... |