RosettaCodeData/Task/Sum-digits-of-an-integer/LiveCode/sum-digits-of-an-integer-1.livecode
2016-12-05 23:44:36 +01:00

8 lines
205 B
Text

function sumDigits n, base
local numb
if base is empty then put 10 into base
repeat for each char d in n
add baseConvert(d,base,10) to numb
end repeat
return numb
end sumDigits