README for week 123

1 files changed, 34 insertions, 54 deletions

diff --git a/challenge-123/abigail/README.md b/challenge-123/abigail/README.md
index fff6c14deb..c951c7d008 100644
--- a/challenge-123/abigail/README.md
+++ b/challenge-123/abigail/README.md
@@ -1,78 +1,58 @@
 # Solutions by Abigail
-## [Average of Stream][task1]
+## [Ugly Numbers][task1]
 
-> You are given a stream of numbers, `@N`.
->
-> Write a script to print the average of the stream at every point.
+> You are given an integer `$n >= 1`.
+> 
+> Write a script to find the $nth element of Ugly Numbers.
+> 
+> > Ugly numbers are those number whose prime factors are `2`, `3` or `5`.
+> > For example, the first 10 Ugly Numbers are `1`, `2`, `3`, `4`, `5`,
+> > `6`, `8`, `9`, `10`, `12`.
 
-### Example
-~~~~
-Input: @N = (10, 20, 30, 40, 50, 60, 70, 80, 90, ...)
-Output:      10, 15, 20, 25, 30, 35, 40, 45, 50, ...
+### Examples
 ~~~~
+Input: $n = 7
+Output: 8
 
-* Average of first number is `10`.
-* Average of first 2 numbers `(10+20)/2 = 15`.
-* Average of first 3 numbers `(10+20+30)/3 = 20`.
-* Average of first 4 numbers `(10+20+30+40)/4 = 25` and so on.
+Input: $n = 10
+Output: 12
+~~~~
 
 ### Solutions
 * [AWK](awk/ch-1.awk)
 * [Bash](bash/ch-1.sh)
-* [Basic](basic/ch-1.bas)
-* [bc](bc/ch-1.bc)
-* [Befunge-93](befunge-93/ch-1.bf)
 * [C](c/ch-1.c)
-* [Go](go/ch-1.go)
-* [Java](java/ch-1.java)
 * [Lua](lua/ch-1.lua)
 * [Node.js](node/ch-1.js)
-* [Pascal](pascal/ch-1.p)
 * [Perl](perl/ch-1.pl)
 * [Python](python/ch-1.py)
-* [R](r/ch-1.r)
 * [Ruby](ruby/ch-1.rb)
-* [Scheme](scheme/ch-1.scm)
-* [Tcl](tcl/ch-1.tcl)
 
 ### Blog
-[Average of Stream][blog1]
+[Perl Weekly Challenge 123: Ugly Numbers][blog1]
 
-## [Basketball Points][task2]
+## [Square Points][task2]
 
-> You are given a score `$S`.
+> You are given coordinates of four points i.e. `(x1, y1)`, `(x2, y2)`,
+> `(x3, y3)` and `(x4, y4)`.
 > 
-> You can win basketball points e.g. `1` point, `2` points and `3` points.
->
-> Write a script to find out the different ways you can score `$S`.
+> Write a script to find out if the given four points form a square.
 
 ### Examples
 ~~~~
-Input: $S = 4
-Output: 1 1 1 1
-        1 1 2
-        1 2 1
-        1 3
-        2 1 1
-        2 2
-        3 1
+Input: x1 = 10, y1 = 20
+       x2 = 20, y2 = 20
+       x3 = 20, y3 = 10
+       x4 = 10, y4 = 10
+Output: 1 as the given coordinates form a square.
 ~~~~
 
 ~~~~
-Input: $S = 5
-Output: 1 1 1 1 1
-        1 1 1 2
-        1 1 2 1
-        1 1 3
-        1 2 1 1
-        1 2 2
-        1 3 1
-        2 1 1 1
-        2 1 2
-        2 2 1
-        2 3
-        3 1 1
-        3 2
+Input: x1 = 12, y1 = 24
+       x2 = 16, y2 = 10
+       x3 = 20, y3 = 12
+       x4 = 18, y4 = 16
+Output: 0 as the given coordinates doesn't form a square.
 ~~~~
 
 ### Solutions
@@ -86,11 +66,11 @@ Output: 1 1 1 1 1
 * [Ruby](ruby/ch-2.rb)
 
 ### Blog
-[Basketball Points][blog2]
+[Perl Weekly Challenge 123: Square Points][blog2]
 
 
 
-[task1]: https://perlweeklychallenge.org/blog/perl-weekly-challenge-122/#TASK1
-[task1]: https://perlweeklychallenge.org/blog/perl-weekly-challenge-122/#TASK2
-[blog1]: https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-122-1.html
-[blog2]: https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-122-2.html
+[task1]: https://perlweeklychallenge.org/blog/perl-weekly-challenge-123/#TASK1
+[task2]: https://perlweeklychallenge.org/blog/perl-weekly-challenge-123/#TASK2
+[blog1]: https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-123-1.html
+[blog2]: https://abigail.github.io/HTML/Perl-Weekly-Challenge/week-123-2.html