diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2022-02-27 14:11:15 +0000 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2022-02-27 14:11:15 +0000 |
| commit | cc1550892f415de8424a0cc75344ddba9b09579a (patch) | |
| tree | 86ed8f3fc7b368165914a061ca3a40626bf66863 | |
| parent | 18eb47ce3819fc1970cce4e690717ec47168a9fc (diff) | |
| download | perlweeklychallenge-club-cc1550892f415de8424a0cc75344ddba9b09579a.tar.gz perlweeklychallenge-club-cc1550892f415de8424a0cc75344ddba9b09579a.tar.bz2 perlweeklychallenge-club-cc1550892f415de8424a0cc75344ddba9b09579a.zip | |
- Added missing guest contribution.
| -rw-r--r-- | challenge-153/laurent-rosenfeld/julia/ch-2.jl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/challenge-153/laurent-rosenfeld/julia/ch-2.jl b/challenge-153/laurent-rosenfeld/julia/ch-2.jl new file mode 100644 index 0000000000..e81b22369c --- /dev/null +++ b/challenge-153/laurent-rosenfeld/julia/ch-2.jl @@ -0,0 +1,17 @@ +fact = map(x -> factorial(x), Vector(0:9)) + +function is_factorion(num) + sum = 0 + start_num = num + for n in 1:length(string(num)) + sum += fact[num % 10 + 1] # Julia arrays start at 1 + num = num รท 10 + end + return sum == start_num +end + +for i in 1:50000 + if is_factorion(i) + println(i) + end +end |