ReplaceAll[(1.25 * (T + C) / (60 * (1 + (0.1125 * R)))), {T-> 90, C->2.5, R->40}]