1 files changed, 10 insertions, 0 deletions
diff --git a/896/CH6/EX6.9/9.sce b/896/CH6/EX6.9/9.sce
new file mode 100755
index 000000000..bcf6b7a3c
--- /dev/null
+++ b/896/CH6/EX6.9/9.sce
@@ -0,0 +1,10 @@
+clc
+//Example 6.9
+//Calculate the drop in pressure per unit length in a pipe
+dp=0.1//psi
+dx=800//ft
+//let D represent d/dx
+//1 psi = 6895 Pa
+//1 m = 3.28 ft
+Dp=(dp/dx)*6895*3.28//Pa/m
+printf("The drop in pressure per unit length in the pipe is %f Pa/m",Dp);
+\ No newline at end of file