Happy numbers: Difference between revisions

m
(Added Liberty BASIC example)
Line 783:
 
=={{header|Liberty BASIC}}==
<lang lb>FOR n = 1 TO 500
ct = 0
PRINT n, HappyN(n, sqrInts$)
n = 0
NEXT n
DO
n = n + 1
PRINT n, IF HappyN(n, sqrIntssqrInt$) = 1 THEN
ct = ct + 1
PRINT ct, n
END IF
LOOP UNTIL ct = 8
END