a=1;for(i=1,14,print(a=a*4-a*2/i))
\q