challenge-153/abigail/java/ch-2.java


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

//
// See https://theweeklychallenge.org/blog/perl-weekly-challenge-153
//

//
// Run as: ln ch-2.java ch2.java; javac ch2.java; java ch2 < input-file
//

import java.util.*;

public class ch2 {
    public static void main (String [] args) {
        Scanner scanner = new Scanner (System . in);
        int [] fac = new int [10];
        fac [0] = 1;
        for (int n = 1; n <= 9; n ++) {
            fac [n] = n * fac [n - 1];
        }
        while (scanner . hasNextInt ()) {
            int num = scanner . nextInt ();
            int sum = 0;
            int n   = num;
            while (n > 0) {
                sum += fac [n % 10];
                n   /= 10;
            }
            System . out . printf ("%d\n", sum == num ? 1 : 0);
        }
    }
}