Resoudre dans R:

***

***