diff --git a/README.md b/README.md
index 9cc8fb4..3023f21 100644
--- a/README.md
+++ b/README.md
@@ -183,7 +183,7 @@ En Océanie : <ul>
 
 <h3>Question 4)</h3>
 <h4><u>Diagramme bâton de l'accroissement moyen par continent :</u></h4>
-<p>Mettre diagramme</p>
+<img src="ex3/Diagramme.PNG">
 
 <h3>Question 5)</h3>
 <p>La population mondiale prévue en 2050 est de <b>9,6 Milliards</b> d'habitants.<br>
diff --git a/ex3/Diagramme.PNG b/ex3/Diagramme.PNG
new file mode 100644
index 0000000..c2ca344
Binary files /dev/null and b/ex3/Diagramme.PNG differ
diff --git a/ex4/Question1.PNG b/ex4/Question1.PNG
new file mode 100644
index 0000000..afe4b4f
Binary files /dev/null and b/ex4/Question1.PNG differ
diff --git a/ex4/ex4.sce b/ex4/ex4.sce
index b713100..90e4542 100644
--- a/ex4/ex4.sce
+++ b/ex4/ex4.sce
@@ -2,3 +2,16 @@ data = csvRead("../data.csv")
 indiceFecondite=data(:,8)
 propMoins15Ans = data(:,9)
 scatter(indiceFecondite, propMoins15Ans, "fill")
+
+taux_mortalite = data(:, 5);
+taux_natalite = data(:, 4);
+coefficients = reglin(taux_natalite, taux_mortalite);
+pente = coefficients(1);
+ordonnee_origine = coefficients(2);
+scatter(taux_natalite, taux_mortalite, "fill");
+xlabel("Taux de natalité");
+ylabel("Taux de mortalité infantile");
+title("Relation entre le taux de natalité et la mortalité infantile");
+x = linspace(min(taux_natalite), max(taux_natalite), 100);
+y = pente*x + ordonnee_origine;
+plot(x, y, "r");