kill(all)$

van=facebook.com/LearningCalculus$

infix("x");

f(a,k):=1/(a x (a+k));

g(a,k):=sum(f(a+i*k,k),i,0,4);

q(a):=g(a-2,a);

q(6);

"x"(a,b):=a*b;

q(6);