diff options
Diffstat (limited to '2267/CH7/EX7.4/ex7_4.sce')
| -rwxr-xr-x | 2267/CH7/EX7.4/ex7_4.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/2267/CH7/EX7.4/ex7_4.sce b/2267/CH7/EX7.4/ex7_4.sce new file mode 100755 index 000000000..2a26aed24 --- /dev/null +++ b/2267/CH7/EX7.4/ex7_4.sce @@ -0,0 +1,12 @@ +//Part A Chapter 7 Example 4
+clc;
+clear;
+close;
+T=110+273.15;//K
+h=50;//cm
+p=143.47;//kPa(at 110 degree C)
+g=9.81;//ravity constant
+p_dash=p-(1000*g*h/100)/1000;//kPa(pressure at 50 cm depth)
+Tsat=108.866;//degree C(for pdash=138.365 kPa);
+disp("Pressure at 50 cm depth is "+string(p_dash)+" kPa. From steam table, Boiling point = "+string(Tsat)+" degree C");
+
|