DSolve[x''[t]==-g/l x[t] + X omega^2/l cos[omega t], x[t], t]