aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAbigail <abigail@abigail.be>2021-05-31 13:03:50 +0200
committerAbigail <abigail@abigail.be>2021-05-31 13:03:50 +0200
commit973dd57dc4c70abf98cf65c4168e2f62d0fb4493 (patch)
tree2ca19b8a17a585b93ef99e6d4f1be190aa9a84db
parent4d46176ccf4080081fde9a1a4aa3ec2f6feb52f8 (diff)
downloadperlweeklychallenge-club-973dd57dc4c70abf98cf65c4168e2f62d0fb4493.tar.gz
perlweeklychallenge-club-973dd57dc4c70abf98cf65c4168e2f62d0fb4493.tar.bz2
perlweeklychallenge-club-973dd57dc4c70abf98cf65c4168e2f62d0fb4493.zip
README for week 115
-rw-r--r--challenge-115/abigail/README.md58
1 files changed, 24 insertions, 34 deletions
diff --git a/challenge-115/abigail/README.md b/challenge-115/abigail/README.md
index 7548aee37d..75cec1ed8e 100644
--- a/challenge-115/abigail/README.md
+++ b/challenge-115/abigail/README.md
@@ -1,58 +1,48 @@
# Solutions by Abigail
-## [Next Palindrome Number](https://perlweeklychallenge.org/blog/perl-weekly-challenge-114/#TASK1)
+## [String Chain](https://perlweeklychallenge.org/blog/perl-weekly-challenge-115/#TASK1)
-> You are given a positive integer `$N`.
+> You are given an array of strings.
+>
+> Write a script to find out if the given strings can be chained
+> to form a circle. Print `1` if found otherwise `0`.
>
-> Write a script to find out the next Palindrome Number higher than
-> the given integer `$N`.
+> > A string `$S` can be put before another string `$T` in circle
+> > if the last character of `$S` is same as first character of `$T`.
### Example
~~~~
-Input: $N = 1234
-Output: 1331
+Input: @S = ("abc", "dea", "cd")
+Output: 1 as we can form circle e.g. "abc", "cd", "dea".
-Input: $N = 999
-Output: 1001
+Input: @S = ("ade", "cbd", "fgh")
+Output: 0 as we can't form circle.
~~~~
### Solutions
-* [AWK](awk/ch-1.awk)
-* [Bash](bash/ch-1.sh)
-* [C](c/ch-1.c)
-* [Perl](perl/ch-1.pl)
### Blog
-[Next Palindrome Number](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-114-1.html)
+[String Chain](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-1.html)
-## [Higher Integer Set Bits](https://perlweeklychallenge.org/blog/perl-weekly-challenge-114/#TASK2)
+## [Largest Multiple](https://perlweeklychallenge.org/blog/perl-weekly-challenge-115/#TASK2)
-> You are given a positive integer `$N`.
->
-> Write a script to find the next higher integer having the same number of
-> `1` bits in binary representation as `$N`.
+> You are given a list of positive integers `(0-9)`, single digit.
+>
+> Write a script to find the largest multiple of `2` that can be
+> formed from the list.
### Examples
~~~~
-Input: $N = 3
-Output: 5
-~~~~
+Input: @N = (1, 0, 2, 6)
+Output: 6210
-Binary representation of `$N` is `011`. There are two `1` bits. So the next
-higher integer is `5` having the same the number of `1` bits i.e. `101`.
+Input: @N = (1, 4, 2, 8)
+Output: 8412
+Input: @N = (4, 1, 7, 6)
+Output: 7614
~~~~
-Input: $N = 12
-Output: 17
-~~~~
-
-Binary representation of `$N` is `1100`. There are two `1` bits. So the next
-higher integer is `17` having the same number of `1` bits i.e. `10001`.
### Solutions
-* [GNU AWK](awk/ch-2.gawk)
-* [Bash](bash/ch-2.sh)
-* [C](c/ch-2.c)
-* [Perl](perl/ch-2.pl)
### Blog
-[Higher Integet Set Bits](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-114-2.html)
+[String Chain](https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-115-2.html)