diff --git a/pre-contest/b_the_alchemist/sol/sol.sh b/pre-contest/b_the_alchemist/sol/sol.sh
new file mode 100644
index 0000000..a02a0ec
--- /dev/null
+++ b/pre-contest/b_the_alchemist/sol/sol.sh
@@ -0,0 +1,19 @@
+#!/bin/bash
+
+SOL=0
+read P L G
+
+for ((x=0; x < $P && x*x < $G; x++))
+do
+    for ((y = 0; y < $L; y++))
+    do
+        ((r=$x*$x + $y + $x*$y))
+        if [ "$r" -eq "$G" ]; then
+            ((SOL+=1))
+        elif [ "$r" -gt "$G" ]; then
+            break
+        fi
+    done
+done
+
+echo $SOL