Armstrong Numbers

Ringkasan Tantangan

Determine if a number is an Armstrong number.

Visit the armstrong-numbers exercise on Exercism to read the full instructions and download the exercise files.

Community Solutions

Lihat Solusi Komunitas

The following are the top 3 community solutions by stars:

Solution 1 by @aswin-sreekumar (⭐ 1) — View on Exercism
Solution 2 by @Vanya329 (⭐ 1) — View on Exercism
Solution 3 by @ErikSchierboom (⭐ 2) — View on Exercism

Source: Exercism haskell/armstrong-numbers

💡 Lihat Solusi

module ArmstrongNumbers (armstrong) where


power_star::Int->[Int]
power_star num 
 | num == 0 = []
 | otherwise = [(num `mod` 10)] ++ power_star (num `div` 10)

armstrong :: Int-> Bool
armstrong num