(*						      *)
(* Numerical Mathematics and Computing, Fifth Edition *)
(* Ward Cheney & David Kincaid		              *)
(* Brooks/Cole Publ. Co.			      *)
(* (c) 2004                                           *)
(* No warranties implied or expressed.	              *)
(* File: ode4   				      *)

(* numerical solution ODE & plot curve *)y
NDSolve[{x'[t] == 3 + 5*Sin[t] + 0.2*x[t], x[0] == 0}, 
         x, {t, 0, 10}]
x[10] /. %
Plot[Evaluate[x[t] /. %%], {t, 0, 10}]