aboutsummaryrefslogtreecommitdiff
path: root/challenge-096/abigail
diff options
context:
space:
mode:
authorDave Jacoby <jacoby.david@gmail.com>2021-01-18 17:31:04 -0500
committerDave Jacoby <jacoby.david@gmail.com>2021-01-18 17:31:04 -0500
commit4cfddf0f8585136d645fe7a34e7fc7ce7787b088 (patch)
tree66afe0ed603cc3aaa834e433eb8e7204ac4b84a4 /challenge-096/abigail
parenteacd94671a7799bbb5d9dce6a3bd16ee57ee711b (diff)
parent754e6dcd79dde5387229a23ae7eca35d70eac4a3 (diff)
downloadperlweeklychallenge-club-4cfddf0f8585136d645fe7a34e7fc7ce7787b088.tar.gz
perlweeklychallenge-club-4cfddf0f8585136d645fe7a34e7fc7ce7787b088.tar.bz2
perlweeklychallenge-club-4cfddf0f8585136d645fe7a34e7fc7ce7787b088.zip
Merge branch 'master' of https://github.com/manwar/perlweeklychallenge-club into master
Diffstat (limited to 'challenge-096/abigail')
-rw-r--r--challenge-096/abigail/README.md62
1 files changed, 62 insertions, 0 deletions
diff --git a/challenge-096/abigail/README.md b/challenge-096/abigail/README.md
new file mode 100644
index 0000000000..a82f466a38
--- /dev/null
+++ b/challenge-096/abigail/README.md
@@ -0,0 +1,62 @@
+# Solution by Abigail
+
+## [Task 1](https://perlweeklychallenge.org/blog/perl-weekly-challenge-095/#TASK1):
+
+You are given a number `$N`.
+
+Write a script to figure out if the given number is Palindrome.
+Print `1` if true otherwise `0`.
+
+### Examples
+~~~~
+Input: 1221
+Output: 1
+
+Input: -101
+Output: 0, since -101 and 101- are not the same.
+
+Input: 90
+Output: 0
+~~~~
+
+### Solutions
+* [awk](awk/ch-1.c)
+* [C](c/ch-1.c)
+* [Node](node/ch-1.js)
+* [Perl](perl/ch-1.pl)
+* [Python](python/ch-1.py)
+
+### Blog
+[Perl Weekly Challenge 95, Part 1](https://wp.me/pcxd30-kq)
+
+
+## [Task 2](https://perlweeklychallenge.org/blog/perl-weekly-challenge-095/#TASK2)
+
+Write a script to demonstrate `Stack` operations like below:
+
+* `push($n)` - add $n to the stack
+* `pop()` - remove the top element
+* `top()` - get the top element
+* `min()` - return the minimum element
+
+### Example
+~~~~
+my $stack = Stack->new;
+$stack->push(2);
+$stack->push(-1);
+$stack->push(0);
+$stack->pop; # removes 0
+print $stack->top; # prints -1
+$stack->push(0);
+print $stack->min; # prints -1
+~~~~
+
+### Solutions
+* [awk](awk/ch-2.awk)
+* [C](c/ch-2.c)
+* [Node](node/ch-2.js)
+* [Perl](perl/ch-2.pl)
+* [Python](python/ch-2.py)
+
+### Blog
+[Perl Weekly Challenge 95, Part 2](https://wp.me/pcxd30-ld)