n! means n (n 1) ... 3 2 1
Find the sum of the digits in the number 100!
;nats ;factorial ;digit-split (defn p20 [] (println (apply + (digit-split (factorial 100))) ) )
%digit_split %factorial p20()->io:format("~w~n",[lists:sum(digit_split(factorial(100)))]).
#factorial #Enumerable #dig_split def p20 puts dig_split(factorial(100)).sum end
//digitSplit //factorial def p20{ println(digitSplit(factorial(100)).foldLeft(0)(_+_)) }