aboutsummaryrefslogtreecommitdiff
path: root/challenge-008/aecepoglu
diff options
context:
space:
mode:
authoraecepoglu <aecepoglu@fastmail.fm>2022-09-04 20:21:51 +0100
committeraecepoglu <aecepoglu@fastmail.fm>2022-09-04 20:21:51 +0100
commit6743e3e74bac2a9589257c78e496b30aed0378e0 (patch)
treec62daf6b701e32058b1a2e4f7f44852d21bbff6a /challenge-008/aecepoglu
parent35658fb34d1cba6d98016bc8900699b42e92c547 (diff)
downloadperlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.gz
perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.tar.bz2
perlweeklychallenge-club-6743e3e74bac2a9589257c78e496b30aed0378e0.zip
solutions 1-56,177,180 missing a few
Diffstat (limited to 'challenge-008/aecepoglu')
-rw-r--r--challenge-008/aecepoglu/README.md1
-rw-r--r--challenge-008/aecepoglu/bqn/ch-1.bqn3
-rw-r--r--challenge-008/aecepoglu/bqn/ch-2.bqn5
3 files changed, 9 insertions, 0 deletions
diff --git a/challenge-008/aecepoglu/README.md b/challenge-008/aecepoglu/README.md
new file mode 100644
index 0000000000..2f43e385e0
--- /dev/null
+++ b/challenge-008/aecepoglu/README.md
@@ -0,0 +1 @@
+Overdue solutions by AhmetEmre
diff --git a/challenge-008/aecepoglu/bqn/ch-1.bqn b/challenge-008/aecepoglu/bqn/ch-1.bqn
new file mode 100644
index 0000000000..133b919359
--- /dev/null
+++ b/challenge-008/aecepoglu/bqn/ch-1.bqn
@@ -0,0 +1,3 @@
+# Challenge 1
+# Write a script that computes the first five perfect numbers. A perfect number is an integer that is the sum of its positive proper divisors (all divisors except itself). Please check Wiki for more information. This challenge was proposed by Laurent Rosenfeld.
+5↑1↓(⊢=·+´1+·/0=⊢|˜1↓↕)¨⊸/↕100000
diff --git a/challenge-008/aecepoglu/bqn/ch-2.bqn b/challenge-008/aecepoglu/bqn/ch-2.bqn
new file mode 100644
index 0000000000..220a168901
--- /dev/null
+++ b/challenge-008/aecepoglu/bqn/ch-2.bqn
@@ -0,0 +1,5 @@
+# Challenge #2
+
+# Write a function, ‘center’, whose argument is a list of strings, which will be lines of text. The function should insert spaces at the beginning of the lines of text so that if they were printed, the text would be centered, and return the modified lines.
+
+•Out¨((' '⥊˜¨⌈´-⊢)∘(⌈2÷˜≠¨∘⊢)∾¨⊢)"one"‿"two three four"‿"five"