Introduction to Algorithms.

Problem 1.4-2

Plot[100 (x^2) - (2^x), {x, 0, 15}];

FindRoot[100 (x^2) - (2^x) == 0, {x, 14}]

Problem 1-1

l = {(10^6), 6 (10^7), 3.6 (10^9), 8.64 (10^10), 2.6 (10^12), 
        3 (10^13), 3 (10^15)};

\(nLogn[x_] := FindRoot[n\ Log[n]\/Log[2] == x, {n, x}]; 

    nCube[x_] := x\^\(1\/3\); 
twon[x_] := Log[x]\/Log[2]; 

    nFac[x_] := FindRoot[\((\(n!\))\) == x, {n, 10.0, 20.0}]; \)

n /. Map[nLogn, l]

N[Map[nCube, l]]

N[Map[twon, l]]

n /. Map[nFac, l]