Task

Write a program to find the sum of squares of a numeric vector.

The program should work on a zero-length vector (with an answer of   0).



Related task

   Mean


lists:foldl(fun(X, Sum) -> X*X + Sum end, 0, [3,1,4,1,5,9]).