kill(all)$

van=facebook.com/LearningCalculus$

f(n):=product(i!,i,1,n) - product(i^(6-i),i,1,n);

create_list([n,f(n)],n, -1,7);