5 files changed, 72 insertions, 0 deletions
diff --git a/409/CH5/EX5.1/Example5_1.sce b/409/CH5/EX5.1/Example5_1.sce
new file mode 100755
index 000000000..e236f1e69
--- /dev/null
+++ b/409/CH5/EX5.1/Example5_1.sce
@@ -0,0 +1,24 @@
+clear ;
+clc;
+// Example 5.1
+printf('Example 5.1\n\n');
+//Page no.109
+// Solution
+
+P = 60 ;//[Gpa]
+
+//(a)
+p_atm = (P*(10^6))/101.3 ;//[atm]
+printf('(a) Pressure in atmospheres is %.2e atm\n',p_atm);
+
+//(b)
+p_s = (P*(10^6)*14.696)/101.3 ;//[psia]
+printf(' (b) Pressure in psia is %.2e psia\n',p_s);
+
+// (c)
+p_in = (P*(10^6)*29.92)/101.3 ;//[inches of Hg]
+printf(' (c) Pressure in inches of Hg is %.2e in. Hg\n',p_in);
+
+// (d)
+p_mm = (P*(10^6)*760)/101.3 ;//[mm of Hg]
+printf(' (d) Pressure in mm of Hg is %.2e mm Hg\n',p_mm);
+\ No newline at end of file
diff --git a/409/CH5/EX5.2/Example5_2.sce b/409/CH5/EX5.2/Example5_2.sce
new file mode 100755
index 000000000..5c6e9d344
--- /dev/null
+++ b/409/CH5/EX5.2/Example5_2.sce
@@ -0,0 +1,12 @@
+clear;
+clc;
+// Example 5.2
+printf('Example 5.2\n\n');
+//Page no. 110
+// Solution
+
+b_rd = 28.0 ;//[in. Hg]
+p_rd = 51.0 ;//[psia]
+p_atm = b_rd*14.7/29.92 ;//[psia]
+p_tnk  =  p_atm+p_rd ;//[psia]
+printf(' Pressure in tank in psia is %.1f psia\n',p_tnk);
+\ No newline at end of file
diff --git a/409/CH5/EX5.3/Example5_3.sce b/409/CH5/EX5.3/Example5_3.sce
new file mode 100755
index 000000000..cf387647c
--- /dev/null
+++ b/409/CH5/EX5.3/Example5_3.sce
@@ -0,0 +1,12 @@
+clear ;
+clc;
+// Example 5.3
+printf('Example 5.3\n\n');
+//Page no. 111
+// Solution
+
+b_rd = 100.0 ;//[kPa]
+gp =  64.5*101.3/76.0 ;//[kPa]
+p_tnk = b_rd-gp ;//[kPa]
+printf(' Absolute Pressure in tank in is %.1f kPa\n',p_tnk);
+printf('  Since absolute pressure in tank(%.1f kPa) is less than 20 kPa , the mice probably will not survive. \n',p_tnk);
+\ No newline at end of file
diff --git a/409/CH5/EX5.4/Example5_4.sce b/409/CH5/EX5.4/Example5_4.sce
new file mode 100755
index 000000000..9231cd53d
--- /dev/null
+++ b/409/CH5/EX5.4/Example5_4.sce
@@ -0,0 +1,13 @@
+clear ;
+clc;
+// Example 5.4
+printf('Example 5.4\n\n');
+//Page no. 115
+// Solution
+
+df = 1.10*10^3 ;//[kg/m^3]
+d = 1.0*10^3 ;//[kg/m^3]
+g = 9.8 ;//[m/s^2]
+h = 22.0 ;//[mm]
+dP = (df-d)*g*(h*10^(-3)) ;//[Pa]
+printf('Pressure difference across the orifice plate is %.1f Pa.\n',dP);
+\ No newline at end of file
diff --git a/409/CH5/EX5.5/Example5_5.sce b/409/CH5/EX5.5/Example5_5.sce
new file mode 100755
index 000000000..a9903cc26
--- /dev/null
+++ b/409/CH5/EX5.5/Example5_5.sce
@@ -0,0 +1,11 @@
+clear ;
+clc;
+// Example 5.5
+printf('Example 5.5\n\n');
+//Page no. 117
+// Solution
+
+p_atm=730.0*29.92/760.0 ;//[in. Hg]
+gp= (4.0*29.92)/(2.54*12*33.91) ;//[in. Hg]
+p_air=p_atm-gp ;//[in. Hg]
+printf(' Pressure of the air is %.1f in. Hg.\n',p_air);
+\ No newline at end of file