summaryrefslogtreecommitdiff
path: root/3718/CH15/EX15.3/Ex15_3.sce
blob: 5241b2c70391564cf570e82a05e8b2a11e0e880a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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)