aboutsummaryrefslogtreecommitdiff
path: root/challenge-153/abigail/node/ch-2.js
diff options
context:
space:
mode:
Diffstat (limited to 'challenge-153/abigail/node/ch-2.js')
-rw-r--r--challenge-153/abigail/node/ch-2.js27
1 files changed, 27 insertions, 0 deletions
diff --git a/challenge-153/abigail/node/ch-2.js b/challenge-153/abigail/node/ch-2.js
new file mode 100644
index 0000000000..7527e75bf4
--- /dev/null
+++ b/challenge-153/abigail/node/ch-2.js
@@ -0,0 +1,27 @@
+#!/usr/local/bin/node
+
+//
+// See https://theweeklychallenge.org/blog/perl-weekly-challenge-153
+//
+
+//
+// Run as: node ch-2.js < input-file
+//
+
+let fac = [1]
+for (let n = 1; n <= 9; n ++) {
+ fac [n] = n * fac [n - 1]
+}
+
+ require ('readline')
+. createInterface ({input: process . stdin})
+. on ('line', line => {
+ let num = +line
+ let n = num
+ let sum = 0
+ while (n > 0) {
+ sum += fac [n % 10]
+ n = Math . floor (n / 10)
+ }
+ console . log (num == sum ? 1 : 0)
+})