Question: Avoid for loop

Hi,

 

I am trying to find a better way calculating the result of an integral ===>

restart; with(linalg); with(LinearAlgebra);
 E := int(1/(1+A*cos(2*Pi*x))^3, x = 0 .. 1);

u := 1; 
F := Vector(10); 
for A from 0.1e-2 by .1 to 1 do 
F[u] := E; 
u := u+1
 end do;
 
now I am doing only for 10 points but normally I need to did for 1000 at least and many times. Is there a way to avoid the for loop which I assume is not really fast. 
 
Thank you 
 
Please Wait...