DSolve[p'[t] ==r p[t], p[t], t]