RosettaCodeData/Task/Self-describing-numbers/LiveCode/self-describing-numbers-2.livecode
2023-07-01 13:44:08 -04:00

9 lines
203 B
Text

on mouseUp
repeat with n = 0 to 10000000
if selfDescNumber(n) then
put n into selfNum[n]
end if
end repeat
combine selfNum using comma
put selfNum
end mouseUp