u=1;v=1;p=1;q=1; # for(k=1,1000,w=u+v;u=v;v=w;p=p*w;q=lcm(q,w);)