Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- \\- Sequences the first terms in A198960. _R. J. Cano_, Jan 4 2012
- upperBound=1000;
- geoserie(a,n,r)=a*(1-r^(n+1))/(1-r);
- a198960(n)=if(n<2, 2*(n==0)+26*(n==1), geoserie(36,n-2,9)*6+26);
- for(j=0,upperBound,print(j," ",a198960(j)));
- quit();
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement