kill(all);

van=facebook.com/LearningCalculus$

n:6$

f[i]:=sin(2*i*x)/sin(x);

create_list(f[i],i,1,n);

results:fullratsimp(integrate(%,x)+C)$
for i: 1 thru n do print("answer ", results[i])$