Modification de l'organisation et de la mise en forme

This commit is contained in:
2023-05-20 17:43:02 +02:00
parent d218fb1e61
commit 4d80f9c352
10 changed files with 165 additions and 108 deletions

7
ex1/scripts/ex1-1.sce Normal file
View File

@@ -0,0 +1,7 @@
data = csvRead("data.csv");
surface = sum(data(:, 2)*1000);
population = sum(data(:, 3)*1000000);
densite = population / surface;
mprintf("Surface terrestre mondiale : %d km²\n", surface);
mprintf("Nombre d''habitants mondial : %.0f habitants\n", population);
mprintf("Densité moyenne : %.2f habitants/km²\n", densite);

49
ex1/scripts/ex1-2.sce Normal file
View File

@@ -0,0 +1,49 @@
data = csvRead("data.csv");
surfaceAfrique = sum(data(1:57, 2)* 1000);
populationAfrique = sum(data(1:57, 3)* 1000000);
densiteAfrique = populationAfrique / surfaceAfrique;
surfaceAmeriqueDuNord = sum(data(58:86, 2)* 1000);
populationAmeriqueDuNord = sum(data(58:86, 3)* 1000000);
densiteAmeriqueDuNord = populationAmeriqueDuNord / surfaceAmeriqueDuNord;
surfaceAmeriqueDuSud = sum(data(87:99, 2)* 1000);
populationAmeriqueDuSud = sum(data(87:99, 3)* 1000000);
densiteAmeriqueDuSud = populationAmeriqueDuSud / surfaceAmeriqueDuSud;
surfaceAsie = sum(data(100:150, 2)* 1000);
populationAsie = sum(data(100:150, 3)* 1000000);
densiteAsie = populationAsie / surfaceAsie;
surfaceEurope = sum(data(151:193, 2)* 1000);
populationEurope = sum(data(151:193, 3)* 1000000);
densiteEurope = populationEurope / surfaceEurope;
surfaceOceanie = sum(data(194:207, 2)* 1000);
populationOceanie = sum(data(194:207, 3)* 1000000);
densiteOceanie = populationOceanie / surfaceOceanie;
mprintf("Surface terrestre :\n");
mprintf("\t• Afrique : %d km²\n", surfaceAfrique);
mprintf("\t• Amérique du nord : %d km²\n", surfaceAmeriqueDuNord);
mprintf("\t• Amérique du sud : %d km²\n", surfaceAmeriqueDuSud);
mprintf("\t• Asie : %d km²\n", surfaceAsie);
mprintf("\t• Europe : %d km²\n", surfaceEurope);
mprintf("\t• Océanie : %d km²\n", surfaceOceanie);
mprintf("Population :\n");
mprintf("\t• Afrique : %d habitants\n", populationAfrique);
mprintf("\t• Amérique du nord : %d habitants\n", populationAmeriqueDuNord);
mprintf("\t• Amérique du sud : %d habitants\n", populationAmeriqueDuSud);
mprintf("\t• Asie : %d habitants\n", populationAsie);
mprintf("\t• Europe : %d habitants\n", populationEurope);
mprintf("\t• Océanie : %d habitants\n", populationOceanie);
mprintf("Densité moyenne :\n");
mprintf("\t• Afrique : %.2f habitants/km²\n", densiteAfrique);
mprintf("\t• Amérique du nord : %.2f habitants/km²\n", densiteAmeriqueDuNord);
mprintf("\t• Amérique du sud : %.2f habitants/km²\n", densiteAmeriqueDuSud);
mprintf("\t• Asie : %.2f habitants/km²\n", densiteAsie);
mprintf("\t• Europe : %.2f habitants/km²\n", densiteEurope);
mprintf("\t• Océanie : %.2f habitants/km²\n", densiteOceanie);

14
ex1/scripts/ex1-3.sce Normal file
View File

@@ -0,0 +1,14 @@
data = csvRead("data.csv");
densiteAfrique = sum(data(1:57, 3)* 1000000) / sum(data(1:57, 2)* 1000);
densiteAmeriqueDuNord = sum(data(58:86, 3)* 1000000) / sum(data(58:86, 2)* 1000);
densiteAmeriqueDuSud = sum(data(87:99, 3)* 1000000) / sum(data(87:99, 2)* 1000);
densiteAsie = sum(data(100:150, 3)* 1000000) / sum(data(100:150, 2)* 1000);
densiteEurope = sum(data(151:193, 3)* 1000000) / sum(data(151:193, 2)* 1000);
densiteOceanie = sum(data(194:207, 3)* 1000000) / sum(data(194:207, 2)* 1000);
bar([densiteAfrique, densiteAmeriqueDuNord, densiteAmeriqueDuSud, densiteAsie, densiteEurope, densiteOceanie]);
title("Densité de population par continent");
xlabel("Continent");
ylabel("Densité (habitants/km²)");
xs2png(0,"ex1/img/ex1-3.png");

31
ex1/scripts/ex1-4.sce Normal file
View File

@@ -0,0 +1,31 @@
data = csvRead("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,"ex1/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,"ex1/img/ex1-4-2.png");