f[m_] := (1/(7 - 2  m)) + (1/(2 m))
df = D[f[m], m]

dfs = Solve[df == 0, m]

f[m] /. dfs

D[
        f[m], {m, 2}] /. dfs