Chapter1

[1]

(20/98)

[2]

N[(1/7), 20]

[3]

(3/5) + (7/9)

[4]

N[(3/5) - (7/9)]

[5]

((3 7)/(5 9))

[6]

((3 7)/(5 9))

[7]

(3.25/4.9)

[8]

(∑_(k = 1)^100) (k^2)

[9]

(Sqrt[2.3])

[10]

N[(Sqrt[2]), 20]

[11]

Sin[4.6]

[12]

N[Sin[30 Degree]]

[13]

f = 3 (x^4) - 2 (x^3) + 5 (x^2) - 7 x + 5; g = 9 (x^3) - 6 (x^2) + 3 x + 8; f + g

[14]

Clear[f]; f[x_] := 3 (x^4) - 2 (x^3) + 5 (x^2) - 7 x + 5

[15]

f[3.2]

[16]

f'[4.7]

[17]

(∂_x) f[x]

[18]

bunsi[n_] := (∑_(k = 1)^n)((k^3) - 4 (k^2) + 5 k - 6); 
    bunbo[n_] := (∑_(k = 1)^n)((k^2) + 5 k - 3); S[n_] := bunsi[n]/bunbo[n]

[19]

S[5]

[20]

S[500]

[21]

S[n_] := 
      Module[{bunsi, bunbo}, 
        bunsi[m_] := (∑_(k = 1)^m)((k^3) - 4 (k^2) + 5 k - 6); 
        bunbo[m_] := (∑_(k = 1)^m)((k^2) + 5 k - 3); 
        bunsi[n]/bunbo[n]]