From 6d7e1942a22328ba6c83e771d113957909eaabcf Mon Sep 17 00:00:00 2001
From: Abigail <abigail@abigail.freedom.nl>
Date: Mon, 21 Feb 2022 13:37:03 +0100
Subject: Solutions for week 153

---
 challenge-153/abigail/python/ch-2.py | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)
 create mode 100644 challenge-153/abigail/python/ch-2.py

(limited to 'challenge-153/abigail/python/ch-2.py')

diff --git a/challenge-153/abigail/python/ch-2.py b/challenge-153/abigail/python/ch-2.py
new file mode 100644
index 0000000000..693eeffe7f
--- /dev/null
+++ b/challenge-153/abigail/python/ch-2.py
@@ -0,0 +1,28 @@
+#!/usr/local/bin/python3
+
+#
+# See https://theweeklychallenge.org/blog/perl-weekly-challenge-153
+#
+
+#
+# Run as: python ch-2.py < input-file
+#
+
+import fileinput
+
+fac = [1] * 10
+for n in range (1, 10):
+    fac [n] = n * fac [n - 1]
+
+for line in fileinput . input ():
+    num = int (line)
+    sum = 0
+    n   = num
+    while n > 0:
+        sum = sum + fac [n % 10]
+        n   = n // 10
+
+    if num == sum:
+        print (1)
+    else:
+        print (0)
-- 
cgit