diff options
Diffstat (limited to '3718/CH15/EX15.3/Ex15_3.sce')
| -rw-r--r-- | 3718/CH15/EX15.3/Ex15_3.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3718/CH15/EX15.3/Ex15_3.sce b/3718/CH15/EX15.3/Ex15_3.sce new file mode 100644 index 000000000..5241b2c70 --- /dev/null +++ b/3718/CH15/EX15.3/Ex15_3.sce @@ -0,0 +1,16 @@ +//Chapter 15: Environmental Pollution and Control
+//Problem: 2
+clc;
+
+//Declaration of Variables
+v0 = 25 // ml, sewage
+d0 = 410 // ppm, dissolved oxygen
+d1 = 120 // ppm, dissolved oxygen
+v1 = 50 // ml, sewage
+
+// Solution
+mprintf("BOD = (DOb - DOi) * Dilution Factor\n")
+mprintf(" BOD = (DOb - DOi) * (ml of sample after dilution) / (ml of sample before dilution)\n")
+
+BOD = (d0 - d1) * (v1 / v0)
+mprintf(" BOD = %d ppm",BOD)
|