2.1.9.5 Mathematica. Time used: 0.001 (sec). Leaf size: 6
ode=D[x[t],t]==(x[t]-1)^2; 
ic={x[0]==1}; 
DSolve[{ode,ic},x[t],t,IncludeSingularSolutions->True]
 
\begin{align*} x(t)&\to 1 \end{align*}