diff --git a/README.md b/README.md
index 95fc44c..70f4c4e 100644
--- a/README.md
+++ b/README.md
@@ -89,4 +89,22 @@ bar([densiteAfrique, densiteAmeriqueDuNord, densiteAmeriqueDuSud, densiteAsie, d
 ```
 **Résultat :**
 
-![Densité de population par continent](resources/img/ex1-3.png)
\ No newline at end of file
+![Densité de population par continent](resources/img/ex1-3.png)
+
+## Question 4
+
+> Représenter la répartition de la surface terrestre puis du nombre d'habitants par continent sous la forme de diagramme en camembert à l'aide de l'instruction `pie`.
+
+**[Script Scilab](resources/scripts/ex1-4.sce) :**
+
+```scilab
+pie([surfaceAfrique, surfaceAmeriqueDuNord, surfaceAmeriqueDuSud, surfaceAsie, surfaceEurope, surfaceOceanie]);
+
+pie([populationAfrique, populationAmeriqueDuNord, populationAmeriqueDuSud, populationAsie, populationEurope, populationOceanie]);
+```
+
+**Résultat :**
+
+![Répartition de la surface terrestre](resources/img/ex1-4-1.png)
+
+![Répartition de la population](resources/img/ex1-4-2.png)
diff --git a/resources/img/ex1-4-1.png b/resources/img/ex1-4-1.png
new file mode 100644
index 0000000..4e89e52
Binary files /dev/null and b/resources/img/ex1-4-1.png differ
diff --git a/resources/img/ex1-4-2.png b/resources/img/ex1-4-2.png
new file mode 100644
index 0000000..72044f5
Binary files /dev/null and b/resources/img/ex1-4-2.png differ
diff --git a/resources/scripts/ex1-4.sce b/resources/scripts/ex1-4.sce
new file mode 100644
index 0000000..70d0035
--- /dev/null
+++ b/resources/scripts/ex1-4.sce
@@ -0,0 +1,31 @@
+data = csvRead("resources/data/data.csv");
+
+surfaceAfrique = sum(data(1:57, 2)* 1000);
+populationAfrique = sum(data(1:57, 3)* 1000000);
+
+surfaceAmeriqueDuNord = sum(data(58:86, 2)* 1000);
+populationAmeriqueDuNord = sum(data(58:86, 3)* 1000000);
+
+surfaceAmeriqueDuSud = sum(data(87:99, 2)* 1000);
+populationAmeriqueDuSud = sum(data(87:99, 3)* 1000000);
+
+surfaceAsie = sum(data(100:150, 2)* 1000);
+populationAsie = sum(data(100:150, 3)* 1000000);
+
+surfaceEurope = sum(data(151:193, 2)* 1000);
+populationEurope = sum(data(151:193, 3)* 1000000);
+
+surfaceOceanie = sum(data(194:207, 2)* 1000);
+populationOceanie = sum(data(194:207, 3)* 1000000);
+
+pie([surfaceAfrique, surfaceAmeriqueDuNord, surfaceAmeriqueDuSud, surfaceAsie, surfaceEurope, surfaceOceanie]);
+title("Répartition de la surface terrestre");
+legend(["Afrique", "Amérique du Nord", "Amérique du Sud", "Asie", "Europe", "Océanie"], 'out_upper_right');
+xs2png(0,"resources/img/ex1-4-1.png");
+
+clf();
+
+pie([populationAfrique, populationAmeriqueDuNord, populationAmeriqueDuSud, populationAsie, populationEurope, populationOceanie]);
+title("Répartition de la population mondiale");
+legend(["Afrique", "Amérique du Nord", "Amérique du Sud", "Asie", "Europe", "Océanie"], 'out_upper_right');
+xs2png(0,"resources/img/ex1-4-2.png");