RosettaCodeData/Task/Happy-numbers/Potion/happy-numbers.potion

21 lines
358 B
Plaintext

sqr = (n): n * n.
isHappy = (n) :
loop :
if (n == 1): return true.
if (n == 4): return false.
sum = 0
n = n string
n length times (i): sum = sum + sqr(n(i) number integer).
n = sum
.
.
firstEight = ()
i = 0
while (firstEight length < 8) :
i++
if (isHappy(i)): firstEight append(i).
.
firstEight string print