> combinat[fibonacci](50);

                             12586269025

> fibo2 :=proc(n)
> option remember;
> if n > 2 then RETURN(fibo2(n-1) + fibo2(n-2)); else RETURN(1); fi;end;
> 

fibo2 := proc(n)
option remember;
    if 2 < n then RETURN(fibo2(n - 1) + fibo2(n - 2))
    else RETURN(1)
    fi
end

> fibo2(50);

                             12586269025

> sum((n-k)*binomial(n,n-k), k=2..n);

                                            n
                      -n - (n - 1) n + 1/2 2  n

> simplify(");

                             2    (n - 1)
                           -n  + 2        n

> evalf(exp(1),100);

2.7182818284590452353602874713526624977572470936999595749669676277\
    24076630353547594571382178525166427

> 10!;

                               3628800

> evalf(sqrt(2*Pi*10) * (10/exp(1))^10, 100);

.35986956187410359216231759328292420530258818832316207716965934207\

                                          7
    19617481055944895816215454514186944 10

>