kill(all)$

fpprintprec:4$

van=facebook.com/LearningCalculus$

pi_max(n) := 3/2 * n/log(n)$

f(n):=pi_max(n)^2/n$ f(n);

create_list(f(n),n,2,8);

float(%);

S(n):=1/n*sum(f(2*n),k,1,n);

create_list(S(n),n,2,8);

float(%);

create_list(S(10^i),i,1,4);

float(%);

limit(pi_max(n),n,inf);

limit(f(n),n,inf);

limit(S(n),n,inf);